analisis_datos.utf8

Índice

El presente notebook contiene información relacionada al entendimiento de los datos y resultados obtenidos de un modelo de predicción para el problema de rehospitalización.

Generalidades
Entendimiento de los datos
Análisis de Registros Pérdidos
Análisis Exploratorio

Análisis univariado - variables continuas
Análisis univariado - variables cardinales

Análisis de clasificación binaria usando WOE y el IV
Modelo

SMOTE - Balanceo de categoria minoritaria
Ajuste del modelo y Estimación de parámetros
Prediciendo y evaluando el desempeño del modelo

Resultados y Conclusiones
Recomendaciones y Estrategias

Haciendo click sobre cada una de las secciones puede ir directamente a cada una de ellas. Al finalizar cada sección encontrará un link para volver al índice.

Generalidades

El objetivo es desarrollar e implementar un modelo de predicción de rehospitalizaciones para apoyar los programas de evitabilidad post-hospitalaria. El análisis se realizará con información que describe las características sociodemográficas del individuo y con algunos datos recolectados por el personal hospitalario; para un periodo de tiempo de dos años y medio, que va desde 2016 hasta 2018.

Volver al Índice

Entendimiento de los datos

El archivo contiene registros que corresponden a eventos de rehospitalizaciones y se encuentra detallado a nivel de cada evento hospitalario. En total son 34898 registros, 18 variables, descartando de manera inicial, aquellos atributos que se derivan después del segundo diagnóstico; los datos se describen a continuación:

Variables continuas (4)
- dias_hosp: días de hospitalización
- dias_uci: número días en UCI
- dias_uce: número días en UCE
- pago_hosp: valor pagado primera hospitalización

Variables nominales (5)
- estrato: estrato Vivienda (0,1,2,3,4,5,6,-1)
- est_civil: estado civil (C,D,S,U,V,-1)
- ciudad: ciudad de contacto del asegurado
- diagnos: código diagnóstico CIE10 de la primera atención
- categoria: categoría del diagnóstico según el tipo de enfermedad

Variable dicotómica (4)
- genero: género del asegurado (M,F)
- ramo: ramo al que pertenece el asegurado
- quirur: si tuvo algun tipo de servicio relacionado a procedimiento quirúrgico
- rehosp_cat_oms: similitud categoría cie10. Esta es nuestra variable objetivo

Variables discretas (2)
- edad: edad del asegurado en el momento de la hospitalización
- marcas: cantidad de marcas confirmadas del asegurado

Variables ordinales (1)
- ingreso: rango de ingresos

Fecha (1)
- Fecha_Ingreso: fecha ingreso hospitalización

Generamos la estadística descriptiva; en ella se puede visualizar que será necesario realizar más adelante algunas conversiones en los tipos de datos que vienen por defecto (por ejemplo el estrato aparece como una variable numérica). Pero antes de continuar con la codificación, procederemos a observar como se encuentran nuestras variables.

Skim summary statistics
 n obs: 34746 
 n variables: 18 

-- Variable type:character -----------------------------------------------------
  variable missing complete     n min max empty n_unique
    ciudad       0    34746 34746   4  25     0      320
   diagnos       0    34746 34746   3   4     0     2974
 est_civil    9055    25691 34746   1   1     0        5
    genero       0    34746 34746   1   1     0        2
   ingreso   14131    20615 34746  13  21     0        4
 proveedor    3138    31608 34746   6  97     0      456

-- Variable type:numeric -------------------------------------------------------
   variable missing complete     n        mean          sd p0        p25     p50        p75      p100
  categoria       0    34746 34746     123.93        56.36  2      95        122     162          262
  dias_hosp       0    34746 34746       4.18         8.85  1       1          2       4          754
   dias_uce       0    34746 34746       0.021        0.51  0       0          0       0           63
   dias_uci       0    34746 34746       0.022        0.66  0       0          0       0           86
       edad       0    34746 34746      50.2         18.07 18      36         48      63          102
    estrato   10498    24248 34746       4.3          1.65 -1       3          5       6            6
     marcas       0    34746 34746       0.63         0.93  0       0          0       1            6
  pago_hosp       0    34746 34746 5705090.59  11443485.94  0 1181419.75 3020994 6175121.25 517393584
     quirur       0    34746 34746       0.49         0.5   0       0          0       1            1
       ramo       0    34746 34746      44.79        25.35 26      26         26      79           79
 rehosp_oms       0    34746 34746       0.023        0.15  0       0          0       0            1

-- Variable type:POSIXct -------------------------------------------------------
      variable missing complete     n        min        max     median n_unique
 fecha_ingreso       0    34746 34746 2015-12-01 2018-09-03 2017-04-19      939

La variable ingreso es la que más datos perdidos tiene, seguida del estrato.
La mayoría de los pacientes no estuvieron ingresados en el UCI o en UCE
El pago hospitalario promedio fue de $5’706,108 con una desviación de $11’447,135 de la media, lo que indica una gran dispersión en los datos, y posible presencia de outliers.
El 75% de la información corresponde a usuarios que no se rehospitalizaron, por ende nuestra variable objetivo se encuentra desbalanceada

Generalidades

En la gráfica siguiente podemos observar que hay en total 4 variables que contienen registros vacios: estrato, estado civil, ingreso y proveedor.

A nivel individual el porcentaje de valores perdidos para todos los casos es superior al 25%. De forma combinada hay más del 30% de campos vacíos; por ende no podemos decir que la probabilidad de que falte un valor depende solo del valor observado, y usar un método para imputarlo (la forma no es aleatoria).

Dado lo anterior, se hace necesario construir una tercera categoría, por lo menos para las variables que poseen menos campos vacíos (estrato y estado civil).

Para estimar si existe una asociación entre las variables que pueda derivarse en colinealidad, se procede primero a verificar que las variables no poseen una distribución normal, una vez realizado esto, se elige el test de Spearman para hallar la correlación lineal por atributo.

           statistic p.value
pago_hosp  0.30905   0      
dias_uci   0.5090968 0      
dias_uce   0.5099771 0      
dias_hosp  0.359832  0      
rehosp_oms 0.5378271 0

Los resultados confirman que ninguna de las variables pesenta una distribución normal y las correlaciones relacionadas a continuación, verifican posibles asociaciones entre las variables de los días en que el paciente estuvo internado en la Unidad de Cuidados Intensivos, en la Unidad de Cuidados Especiales y los días que el paciente estuvo hospitalizado. Por conocimiento de facto, la relación entre la variable “dias_uci” y “dias_uce” es entendible, ya que cuando un paciente que ha pasado por la Unidad de Cuidados Intensivos pasó su momento de crisis y su estado de salud es más estable, suele ser remitido a la Unidad de Cuidados Especiales.

Sin embargo, las correlaciones obtenidas no cumplen un umbral suficiente para considerarlas importantes, por ende se procede a conservarlas y evaluar más adelante si es preciso eliminarlas definitivamente. Por otro lado, la variable categoría y diagnóstico están altamente correlacionadas con la variable endógena, por lo que es necesario eliminarlas del análisis, para no incurrir en posibles sobreajustes en la etapa de modelado.

Como se había mencionado anteriormente, teniendo en cuenta el análisis de datos perdidos o nulos, se decide descartar la variable ingreso ya que contiene mas de un 30% en datos perdidos.

Classes ‘tbl_df’, ‘tbl’ and 'data.frame':   34746 obs. of  12 variables:
 $ edad      : Factor w/ 7 levels "18-30","31-40",..: 3 4 7 1 5 3 2 7 2 7 ...
 $ estrato   : Factor w/ 7 levels "1","2","3","4",..: 7 4 5 3 7 6 7 7 4 4 ...
 $ est_civil : Factor w/ 6 levels "C","D","S","Sin Informacion",..: 1 1 4 4 1 1 1 1 1 4 ...
 $ genero    : Factor w/ 2 levels "F","M": 1 2 1 1 2 1 2 2 1 1 ...
 $ marcas    : Factor w/ 3 levels "[0,2]","(2,4]",..: 1 1 1 1 1 1 1 1 1 1 ...
 $ ramo      : Factor w/ 2 levels "26","79": 1 1 1 2 1 1 1 1 1 2 ...
 $ quirur    : Factor w/ 2 levels "No","Si": 2 2 2 1 1 2 2 2 1 2 ...
 $ dias_hosp : num  4 3 52 2 6 2 5 14 4 1 ...
 $ dias_uci  : num  0 0 0 0 0 0 0 0 0 0 ...
 $ dias_uce  : num  0 0 0 0 0 0 0 0 0 0 ...
 $ pago_hosp : num  20604175 98000 2090823 1459979 246683 ...
 $ rehosp_oms: num  0 0 0 0 0 0 0 0 0 0 ...

Volver al Índice

Análisis Exploratorio

Análisis univariado - variables continuas

Es evidente la existencia también, de valores atípicos muy marcados tanto en el numéro de días de hospitalización, como en los números de días que el paciente estuvo en la Unidad de Cuidado Intensivo y Especial, en dónde los valores atípicos más grandes suceden en los eventos que no desencadenaron en rehospitalización.

Con el análisis anterior no sólo se logra identificar la presencia de valores atípicos, sino que también es posible evidenciar que los datos se encuentran altamente desbalanceados. En el caso de los outliers se truncará en los casos en que sea necesario, imputando los valores que superen cierto límite en el percentil, tanto mayor como menor.

Se puede observar que en la variable días UCI, correspondiente al primer diagnóstico, no parece haber una diferencia significativa en la distribución al discriminar por la variable objetivo binaria, es decir, entre los casos de rehospitalización (1) y casos de no rehospitalización (0). Adicionalmente, la distibución en ambas variables no es simétrica.

A pesar de que los datos se encuentran bastante dispersos, se logra identificar diferencias en la variable del pago -con valores más altos en los caso en que no terminó de buevo hospitalizado, y en el casó del número de días hospitalizado los rangos son mucho más pequeños cuando hay una rehospitalización.

Análisis variables categóricas

Observando las variables categóricas la diferencia entre la probabilidad de que el evento ocurra (haya rehospitalización) o no, se puede evidenciar sólo en algunas clases por categoría, pero en general, las proporciones suelen ser bastantes similares, por lo que no es posible elaborar a priori una hipótesis que estipule diferencias significativas en las distribuciones, por lo menos para ninguna de las dos variables relacionadas en el gráfico a continuación.

Por otro lado, el atributo que indica el hecho de que se hayan realizado procedimientos quirúrgicos durante la primera hospitalización muestran cierta diferencia en la distribuión por grupo; es más probable que la persona deba ser rehospitalizada de nuevo.

Con el objetivo de enriquecer el análisis exploratorio, se calcularán dos medidas muy comúnes de la teoría de la información, éstas permiten inferir algo del poder predictivo que pueden tener las variables independientes, antes de hacer parte de un modelo.

Volver al Índice

Análisis de clasificación binaria usando WOE y el IV

El peso de la evidencia (WOE) y el valor de la información (IV) ayudan, entre otras cosas, a determinar la contribución independiente de cada variable al resultado, y detectar relaciones lineales y no lineales. El WOE mide la relación entre la variable predictiva y el objeto binario, mientras que el IV mide la fuerza predictiva de esa relación.

La tabla a continuación contiene los valores del “valor de la información” con y sin el ajuste derivado de la validación cruzada. Cuando se realiza el ajuste con el objetivo de que los resultados sean más estables, tanto pago del diagnóstico, el hecho de que el paciente halla pasado por la Unidad de cuidados, y si fueron realizados procedimientos quirúrgicos serán las únicas variables con suficiente capacidad de predicción a nivel individual y univariable (Iv > 0.05). Cuando se relaja el supuesto, IV sin restar el penalty, se incluirían los días en que estuvo hospitalizado.

	Variable	IV	PENALTY	AdjIV
10	dias_uce	3.2493169	0.5162541	2.7330628
9	dias_uci	3.1969572	0.5881637	2.6087935
11	pago_hosp	0.7340365	0.0828997	0.6511369
7	quirur	0.3050877	0.0203025	0.2847852
8	dias_hosp	0.0753638	0.0314285	0.0439353
4	genero	0.0264964	0.0086772	0.0178192
5	marcas	0.0051570	0.0014848	0.0036722
6	ramo	0.0001644	0.0009926	-0.0008283
2	estrato	0.0155690	0.0179440	-0.0023750
1	edad	0.0248180	0.0273145	-0.0024965
3	est_civil	0.0112672	0.0209304	-0.0096632

De acuerdo al poder predictivo de cada una de las variables, se eligen aquellas cuyo Valor de la informaciÓn (IV) sea superior al 2% (0,02). Las variables con IV inferiores a este valor se consideran impredictivas y se decide descartarlas. Las variables que continuan, en orden de relevancia segun su poder predictor, son:

pago_hosp
quirur
dias_uce
dias_uci
proveedor
dias_hosp
edad
genero
ciudad

Sin embargo, tanto la ciudad, como el proveedor no serán tenidos en cuenta, por que pueden llegar a condicionar nuestra variable objetivo. Adiconalmente, lo días UCE y UCI parecen estar altamente correlacionados con la variable objetivo. por lo que tampoco serán tenidos en cuenta.

Enfocandonos en el pago del diagnóstico, el cual, es una de las variables con mayor influencia, el WOE nos indica una relación no lineal, con un incremento en el WOE a medida que disminuye el rango de pago en el diagnóstico.

edad	N	Percent	WOE	IV	PENALTY
18-30	3516	0.1445605	-0.2939551	0.0108881	0.0095595
31-40	5221	0.2146616	0.1123261	0.0137465	0.0140510
41-50	4331	0.1780692	-0.1265459	0.0164325	0.0162139
51-60	4127	0.1696818	0.0708065	0.0173126	0.0205247
61-70	3252	0.1337061	-0.0337434	0.0174624	0.0216321
71-80	2270	0.0933311	0.0117238	0.0174753	0.0219054
81+	1605	0.0659896	0.3094369	0.0248180	0.0273145

Como se pudo observar en el analisis del WOE, esta técnica ajusta los valores de las variables numericas en rangos acotados de acuerdo al valor de la informacion de cada una de ellas en relacion con la variable dependiente. Por esto, es importante transformar dichas variables en los rangos recomendados.

Volver al Índice

Modelo

El objetivo principal del análisis es estimar un modelo predictivo con el cuál se pueda estimar la probabilidad de que un paciente termine en una rehospitalización, asociada a un diangóstico anterior. Para ello se empleará un modelo de regresión logística, el cuál es ampliamente utilizado para resolver problemas de clasificación binaria.

Una vez se realizan los filtros de calidad y completitud, y tras lo obtenido en los resultados del WOE, se procede a realizar la seleccion de variables para el modelo. Se tendrán en cuenta entonces, el pago realizado, los días en que estuvo el paciente de forma general, el hecho de que se le haya realizado o no una cirugía, el género, la edad y el estrato.

Para evaluar la capacidad de generalización del modelo, se dividirá el conjunto de datos en entrenamiento (70%) y prueba (30%).

Volver al Índice

Smote

Como se habia mencionado anteriormente, la informacion se encuentra desbalanceada; esto es, teniendo en cuenta que el problema en que se esta trabajando consiste en la clasificacion de una variable dicotómica, se debe analizar el nivel de representacion de sus posibles valores dentro del conjunto total de datos.

Var1	Freq
0	0.9774075
1	0.0225925

Vemos que la representacion para la categoría positiva es un poco mas del 2% de la información. En este caso vamos a realizar un tratamiento que permita aumentar la clase minoritaria, sin utilizar soluciones genéricas como reducir la clase mayoritaria al nivel de la clase menor.

Para ello, vamos a utilizar la técnica SMOTE (Synthetic Minority Oversampling Method), la cual genera nuevas instancias artificiales de la clase más pequeña interpolando los valores de las instancias minoritarias más cercanas a una dada.

Por medio de SMOTE se generará un nuevo set de datos de entrenamiento, en el cual se tenga un 60% de informacion para la categoria negativa (rehosp_oms = 0) y 40% para la categoria positiva (rehosp_oms = 0).

Verificamos que el set de entrenamiento se encuentre balanceado:

Var1	Freq
0	0.5263167
1	0.4736833

Volver al Índice

Ajuste del modelo y Estimación de parámetros

Del resultado exploratorio anterior, al discriminar el análisis de las variables independientes por nuestra variable objetivo (Rehospitalización), es posible evidenciar una diferencia clara entre las distribuciones para los atributos: Pago/costo del procedimiento y los días en que el usuario estuvo internado ya sea en la Unidad de Cuidados Intensivos o Especiales. Esto podría ser un indicio de que estas variables en particular, pueden llegar a ser relevantes para explicar la probabilidad de ocurrencia del evento, es decir, cuando hubo una hospitalización posterior ligada a un diagnóstico.

A continuación, al ajustar el modelo obtenemos los siguientes resultados:

Cada cambio en una unidad en el pago hospitalario disminuirá las probabilidades de rehospitalización, pero en una cantidad muy pequeña (-6.953E-08)
Cuando a un paciente se le realiza un procedimiento quirúrgico su probabilidad de que termine hospitalizado de nuevo por el mismo diagnóstico, disminuye en más del 19% en comparación a cuando no se le realiza ninguna cirugía.
La probabilidad de rehospitalización decrece, al permanecer un día adicional el paciente en la UCE (en 1.45) y la UCI (1.73)

El resto de las variables no son suficientemente explicativas para predecir, de manera significativa, su efecto sobre la variable de respuesta binaria.

Después de estimados los coeficentes se procede a realizar la predicción dentro y fuera de muestra para evaluar la precisión (accuracy) y capacidad de generalización de nuestro modelo.

Los resultados indican un nivel de accuracy sospechosamente elevado, inluso el modelo parece ajustarse mejor con los datos nuevos, que en la parte de entrenamiento. Para ver en detalle como se comporta, al discriminar entre los casos en que el paciente sale definitivamente o termina en una rehospitalización, y evidenciar su desempeño por separado, se estimará la matriz de confusión:

table(as.matrix(testing[, 7]), y_pred > 0.5)

Los resultados no parecen indicar que éste comportamiento se den a causa del desbalanceo. Por un lado tenemos que la sensibilidad y la especificidad corresponden al 96% y 99%. Si se habla en términos de precisión, sería de de un 99% cuando es 0, es decir de un total de 10218 pacientes que no terminaron en hospitalización pude predecir con una exactitud que el 99% no lo harían, mientras que de 249 pacientes que si tuvieron una rehospitalización pude predecir que 210 efectivamente lo harían, es decir, mi precisión fue del 84%.

Sin embargo, no sólo por los resultados obtenidos con el ajuste del modelo, sino también con lo que veíamos anteriormente en la tabla del valor de la información, las variables días UCI y días UCE parecen explicar de manera casi perfecta la probabilidad de que ocurre un evento rehospitalario y esto puede deberse …….. por ende se decide estimar el modelo sin incluirlas.

A continuación, se obtienen los resultados:

mylogit_2 <- glm(rehosp_oms ~ pago_hosp + quirur + dias_hosp + estrato, data = training, family = "binomial")
summary(mylogit)

pred_train <- predict(mylogit_2, newdata = training[-7], type = "response")
y_pred_train <- ifelse(pred_train > 0.5, 1, 0)
y_act_train <- training$rehosp_oms

pred = predict(mylogit_2, type = 'response', newdata = testing[-7])
y_pred = ifelse(pred > 0.5, 1, 0)
y_act <- testing$rehosp_oms

tapply(pred_train, training[,7], FUN = median)


Sensibilidad = 210/218 
Sensibilidad

especificidad = 10243/10251
especificidad

Accuracy = (10243 + 210)/10469
Accuracy

###Regularizado

library(glmnet)
set.seed(123) 

x <- model.matrix(rehosp_oms~., training)[,-1]
y <- ifelse(training$rehosp_oms == "1", 1, 0)

##Hallando el mejor lambda
cv.lasso <- cv.glmnet(x, y, alpha = 1, family = "binomial")
plot(cv.lasso)

La gráfica muestra el error de validación cruzada de acuerdo con el registro de lambda. La línea vertical punteada a la izquierda indica que el registro del valor óptimo de lambda es aproximadamente -9, que es el que minimiza el error de predicción. Este valor lambda dará el modelo más preciso. El valor exacto de lambda se puede ver como sigue:

cv.lasso$lambda.min

En general, el propósito de la regularización es equilibrar la precisión y la simplicidad. Esto significa, un modelo con el menor número de predictores que también da una buena precisión. Para este fin, la función cv.glmnet() también encuentra el valor de lambda que proporciona el modelo más simple pero también se encuentra dentro de un error estándar del valor óptimo de lambda. Este valor se llama lambda.1se.

cv.lasso$lambda.1se

coef(cv.lasso, cv.lasso$lambda.min)

Con lambda.min ningún coeficiente es igual a cero.

Usando lambda.1secomo la mejor lambda, da los siguientes coeficientes de regresión:

coef(cv.lasso, cv.lasso$lambda.1se)

Usando lambda.1se, solo el coeficiente de una variable se ha establecido en cero mediante el algoritmo de lazo, reduciendo la complejidad del modelo.

La configuración de lambda = lambda.1se produce un modelo más simple en comparación con lambda.min, pero el modelo podría ser un poco menos preciso que el obtenido con lambda.min.

##Lambda regression
model <- glmnet(x, y, alpha = 1, family = "binomial", lambda = cv.lasso$lambda.min)
coef(model)

# Make predictions on the test data
x.test <- model.matrix(rehosp_oms ~., testing)[,-1]
probabilities <- model %>% predict(newx = x.test)
predicted.classes <- ifelse(probabilities > 0.5, "1", "0")

###Matriz training

SRL_pred_train <- predict(model, x, type="class", s=cv.lasso$lambda.min)
confusion_matrix_train <- table(y, SRL_pred_train)
confusion_matrix_train

error_rate_train <- (544+1453)/5720.0
error_rate_train

###Matriz test

x_test <- model.matrix(rehosp_oms~., testing)[,-1]
y_test <- ifelse(testing$rehosp_oms == "1", 1, 0)

SRL_pred_test <- predict(model, x_test, type="class", s=cv.lasso$lambda.min)
confusion_matrix_test <- table(y_test, SRL_pred_test)
confusion_matrix_test

error_rate_test <- (1605+143)/10424.0
error_rate_test

# Model accuracy
observed.classes <- testing$rehosp_oms
mean(predicted.classes == observed.classes)

#report mean error rate (fraction of incorrect labels)
confusion_matrix_train <- table(as.matrix(testing[, 7]), y_pred > 0.5)

confusion_matrix_train <- table(testing, predicted.classes)
confusion_matrix_train

Calculando el modelo con lambda.1se:

# Final model with lambda.1se
lasso.model <- glmnet(x, y, alpha = 1, family = "binomial",
                      lambda = cv.lasso$lambda.1se)
# Make prediction on test data
x.test <- model.matrix(rehosp_oms ~., testing)[,-1]
probabilities <- lasso.model %>% predict(newx = x.test)
predicted.classes <- ifelse(probabilities > 0.5, "1", "0")
# Model accuracy rate
observed.classes <- testing$rehosp_oms
mean(predicted.classes == observed.classes)

Volver al Índice

Recomendaciones y Estrategias

Como se pudo observar en la definicion de la variable endógena de la rehospitalización, esta se construyó mediante dos restricciones en el set de datos inicial: 1. Que dentro de los siguientes 30 dias a la primera hospitalización surgiera una segunda hospitalizacion. 2. Que para aquellos casos donde hay dos eventos en la ventana de 30 días, los códigos de diagnóstico CIE10 del primero y segundo evento pertenecieran a la misma categoría de diagóstico en la clasificación de la OMS.

En este sentido, tenemos dos condicionantes que se podrían ajustar, ya que restringen la posibilidad de encontrar un mayor numero de casos que se puedan considerar como rehospitalización; por ejemplo, algunos estudios sugieren que la ventana de tiempo podría ser de 15 dias entre el primer y segundo evento. En cuanto a la similitud de los diagnósticos de ambos eventos, para este modelo se tuvo en cuenta solo si ambos diagnósticos pertenecen a la misma categoría, sin embargo es importante tener en cuenta que hay diagnósticos que pueden desencadenar en otros que no necesariamente sean de la misma categoría. Este tipo de asociaciones requieren de un mayor análisis a nivel médico.

Se han descrito factores asociados con la rehospitalizacion relacionados con la calidad de vida de los pacientes, sin embargo en este modelo no se incluyo gran parte de este tipo de informacion, ya que, desde el principio, la población objetivo se compone de individuos asegurados en poliza de vida y salud, en su mayoria, de estrato cuatro hacia arriba. De esta forma ya no aporta información medir el nivel de calidad de vida o falicidad de acceso a los servicios de salud, pero se podria tener en cuenta información relacionada con sintomas depresivos.

La calidad en el cuidado hospitalario tambien se ha considerado como un factor importante, por lo tanto se podría considerar la agregación de información que indique que tan óptimas son las condiciones para una buena atención en los centros hospitalarios y lugares que se tuvieron en cuenta.

# PASO 1:   Carga Package y Set de datos
# ---------------------------------------------------------------------------
library(C50)
library(rpart)
library(rpart.plot) 
data(churn); # carga tablas

# PASO 2:   Crea Arbol de Decision
# ---------------------------------------------------------------------------
ModeloArbol <- rpart(rehosp_oms ~ ., data = training, parms=list(split="information"))
#ModeloArbol <- rpart(rehosp_oms ~ ., data = training, method = 'class')
 
# PASO 3:  Predice rehospitalizacion en datos de TEST
# ---------------------------------------------------------------------------
Prediccion <- predict(ModeloArbol, testing, type="class") # Predicción en Test
MC         <- table(testing$rehosp_oms, Prediccion) # Matriz de Confusión

MC
# PASO 4: Crea Grafico
# ---------------------------------------------------------------------------
rpart.plot(ModeloArbol, type=1, extra=100,cex = .7,  box.col=c("gray99", "gray88")[ModeloArbol$frame$yval])

LS0tDQp0aXRsZTogIjxzcGFuIHN0eWxlPSdjb2xvcjojMzA1ZjcyJz48Y2VudGVyPjxicj5Nb2RlbG8gZGUgUHJlZGljY2nDs24gUmVob3NwaXRhbGl6YWNpw7NuPC9jZW50ZXI+Ig0Kb3V0cHV0OiBodG1sX25vdGVib29rDQpkYXRlOiAiPGNlbnRlcj5BYnJpbCAyMDE5PC9jZW50ZXI+Ig0KYXV0aG9yOiAiPGNlbnRlcj48YSBocmVmPSdtYWlsdG86YW5kcmVzLmdvbnphbGV6QGRhdGFseXRpY3MuY29tJz5BbmRyw6lzIEZlbGlwZSBHb256w6FsZXo8L2E+PC9jZW50ZXI+Ig0KLS0tDQoNCjxocj4NCjx0YWJsZT4NCjx0cj4NCjx0ZD48aW1nIHN0eWxlPSJ3aWR0aDoyODBweDsgaGVpZ2h0OjIwMHB4OyIgc3JjPSJTVVJBLnBuZyIgLz48L3RkPg0KPHRkPjxpbWcgc3R5bGU9IndpZHRoOjIwMHB4OyBoZWlnaHQ6MTUwcHg7IiBzcmM9ImJsYW5jby5qcGciIC8+PC90ZD4NCjx0ZD48aW1nIHN0eWxlPSJ3aWR0aDozNjBweDsgaGVpZ2h0OjEwMHB4OyIgc3JjPSJEYXRhbHl0aWNzLnBuZyIgLz48L3RkPg0KPC90cj4NCjwvdGFibGU+DQo8aHI+DQoNCjxoMyBpZD0iaW5kaWNlIiBzdHlsZT0idGV4dC1hbGlnbjogY2VudGVyOyIgbWFya2Rvd249IjEiPsONbmRpY2U8L2gzPg0KPGRpdiBzdHlsZT0idGV4dC1hbGlnbjoganVzdGlmeSI+DQoNCkVsIHByZXNlbnRlIG5vdGVib29rIGNvbnRpZW5lIGluZm9ybWFjacOzbiByZWxhY2lvbmFkYSBhbCBlbnRlbmRpbWllbnRvIGRlIGxvcyBkYXRvcyB5IHJlc3VsdGFkb3Mgb2J0ZW5pZG9zIGRlIHVuIG1vZGVsbyBkZSBwcmVkaWNjacOzbiBwYXJhIGVsIHByb2JsZW1hIGRlIHJlaG9zcGl0YWxpemFjacOzbi4NCg0KPG9sPg0KICAgIDxsaT48YSBocmVmPSIjR2VuZXJhbGlkYWRlcyI+R2VuZXJhbGlkYWRlczwvYT48L2xpPg0KICAgIDxsaT48YSBocmVmPSIjRW50ZW5kaW1pZW50byI+RW50ZW5kaW1pZW50byBkZSBsb3MgZGF0b3M8L2E+PC9saT4NCiAgICA8bGk+PGEgaHJlZj0iI1BlcmRpZG9zIj5BbsOhbGlzaXMgZGUgUmVnaXN0cm9zIFDDqXJkaWRvczwvYT48L2xpPg0KICAgIDxsaT48YSBocmVmPSIjQW5hbGlzaXMiPkFuw6FsaXNpcyBFeHBsb3JhdG9yaW88L2E+PC9saT4NCiAgICAgIDxvbD4NCiAgICAgICAgPGxpPjxhIGhyZWY9IiNBbmFsaXNpc0NvbiI+QW7DoWxpc2lzIHVuaXZhcmlhZG8gLSB2YXJpYWJsZXMgY29udGludWFzPC9hPjwvbGk+DQogICAgICAgIDxsaT48YSBocmVmPSIjQW5hbGlzaXNDYXIiPkFuw6FsaXNpcyB1bml2YXJpYWRvIC0gdmFyaWFibGVzIGNhcmRpbmFsZXM8L2E+PC9saT4NCiAgICAgIDwvb2w+DQogICAgPGxpPjxhIGhyZWY9IiNBbmFsaXNpc1dPRSI+QW7DoWxpc2lzIGRlIGNsYXNpZmljYWNpw7NuIGJpbmFyaWEgdXNhbmRvIFdPRSB5IGVsIElWPC9hPjwvbGk+DQogICAgPGxpPjxhIGhyZWY9IiNNb2RlbG8iPk1vZGVsbzwvYT48L2xpPg0KICAgICAgPG9sPg0KICAgICAgICA8bGk+PGEgaHJlZj0iI1NNT1RFIj5TTU9URSAtIEJhbGFuY2VvIGRlIGNhdGVnb3JpYSBtaW5vcml0YXJpYTwvYT48L2xpPg0KICAgICAgICA8bGk+PGEgaHJlZj0iI0FqdXN0ZW1vZCI+QWp1c3RlIGRlbCBtb2RlbG8geSBFc3RpbWFjacOzbiBkZSBwYXLDoW1ldHJvczwvYT48L2xpPg0KICAgICAgICA8bGk+PGEgaHJlZj0iI0V2YWx1YWNpb24iPlByZWRpY2llbmRvIHkgZXZhbHVhbmRvIGVsIGRlc2VtcGXDsW8gZGVsIG1vZGVsbzwvYT48L2xpPg0KICAgICAgPC9vbD4NCiAgICA8bGk+PGEgaHJlZj0iI0NvbmNsdXNpb25lcyI+UmVzdWx0YWRvcyB5IENvbmNsdXNpb25lczwvYT48L2xpPg0KICAgIDxsaT48YSBocmVmPSIjUmVjb21lbmRhY2lvbiI+UmVjb21lbmRhY2lvbmVzIHkgRXN0cmF0ZWdpYXM8L2E+PC9saT4NCjwvb2w+DQoNCkhhY2llbmRvIGNsaWNrIHNvYnJlIGNhZGEgdW5hIGRlIGxhcyBzZWNjaW9uZXMgcHVlZGUgaXIgZGlyZWN0YW1lbnRlIGEgY2FkYSB1bmEgZGUgZWxsYXMuIEFsIGZpbmFsaXphciBjYWRhIHNlY2Npw7NuIGVuY29udHJhcsOhIHVuIGxpbmsgcGFyYSB2b2x2ZXIgYWwgw61uZGljZS48L2Rpdj4NCjxocj4NCg0KPGgzIGlkPSJHZW5lcmFsaWRhZGVzIiBzdHlsZT0idGV4dC1hbGlnbjogY2VudGVyOyIgbWFya2Rvd249IjEiPkdlbmVyYWxpZGFkZXM8L2gzPg0KPGRpdiBzdHlsZT0idGV4dC1hbGlnbjoganVzdGlmeSI+DQoNCkVsIG9iamV0aXZvIGVzIGRlc2Fycm9sbGFyIGUgaW1wbGVtZW50YXIgdW4gbW9kZWxvIGRlIHByZWRpY2Npw7NuIGRlIHJlaG9zcGl0YWxpemFjaW9uZXMgcGFyYSBhcG95YXIgbG9zIHByb2dyYW1hcyBkZSBldml0YWJpbGlkYWQgcG9zdC1ob3NwaXRhbGFyaWEuIEVsIGFuw6FsaXNpcyBzZSByZWFsaXphcsOhIGNvbiBpbmZvcm1hY2nDs24gcXVlIGRlc2NyaWJlIGxhcyBjYXJhY3RlcsOtc3RpY2FzIHNvY2lvZGVtb2dyw6FmaWNhcyBkZWwgaW5kaXZpZHVvIHkgY29uIGFsZ3Vub3MgZGF0b3MgcmVjb2xlY3RhZG9zIHBvciBlbCBwZXJzb25hbCBob3NwaXRhbGFyaW87IHBhcmEgdW4gcGVyaW9kbyBkZSB0aWVtcG8gZGUgZG9zIGHDsW9zIHkgbWVkaW8sIHF1ZSB2YSBkZXNkZSAyMDE2IGhhc3RhIDIwMTguDQoNCltWb2x2ZXIgYWwgw41uZGljZV0oI2luZGljZSk8L2Rpdj4NCg0KYGBge3IsIG1lc3NhZ2UgPSBGQUxTRSwgd2FybmluZyA9IEZBTFNFLCBlY2hvID0gRkFMU0UsIGV2YWwgPVRSVUV9DQpybShsaXN0ID0gbHMoKSkNCm9wdGlvbnMoc2NpcGVuID0gMTAwKQ0KDQpzb3VyY2UoImZ1bmN0aW9uc19wbG90LlIiKQ0KDQpsaXN0Lm9mLnBhY2thZ2VzIDwtIGMoInJlYWR4bCIsICJkcGx5ciIsICJnZ3Bsb3QyIiwgImdnY29ycnBsb3QiLCAiVklNIiwgIlJDb2xvckJyZXdlciIsICJJbmZvcm1hdGlvbiIsICJrbml0ciIsICJrYWJsZUV4dHJhIiwgImdyaWRFeHRyYSIsICJza2ltciIsICJub3J0ZXN0IiwgIkdHYWxseSIsICJwbG90bHkiLCAibGF0dGljZSIsICJETXdSIiwgImNhVG9vbHMiLCAicGxvdGx5IikNCg0KbmV3LnBhY2thZ2VzIDwtIGxpc3Qub2YucGFja2FnZXNbIShsaXN0Lm9mLnBhY2thZ2VzICVpbiUgaW5zdGFsbGVkLnBhY2thZ2VzKClbLCJQYWNrYWdlIl0pXQ0KaWYobGVuZ3RoKG5ldy5wYWNrYWdlcykpIGluc3RhbGwucGFja2FnZXMobmV3LnBhY2thZ2VzKQ0KDQpsb2FkIDwtIGxhcHBseShsaXN0Lm9mLnBhY2thZ2VzLCBsaWJyYXJ5LCBjaGFyYWN0ZXIub25seSA9IFRSVUUpDQpgYGANCg0KPGhyPg0KPGgzIHN0eWxlPSJ0ZXh0LWFsaWduOiBjZW50ZXI7IiBpZD0iRW50ZW5kaW1pZW50byIgbWFya2Rvd24gPSAiMSI+RW50ZW5kaW1pZW50byBkZSBsb3MgZGF0b3M8L2gzPg0KPGRpdiBzdHlsZT0gInRleHQtYWxpZ246anVzdGlmeSI+IA0KDQpFbCBhcmNoaXZvIGNvbnRpZW5lIHJlZ2lzdHJvcyBxdWUgY29ycmVzcG9uZGVuIGEgZXZlbnRvcyBkZSByZWhvc3BpdGFsaXphY2lvbmVzIHkgc2UgZW5jdWVudHJhIGRldGFsbGFkbyBhIG5pdmVsIGRlIGNhZGEgZXZlbnRvIGhvc3BpdGFsYXJpby4gRW4gdG90YWwgc29uIDM0ODk4IHJlZ2lzdHJvcywgMTggdmFyaWFibGVzLCBkZXNjYXJ0YW5kbyBkZSBtYW5lcmEgaW5pY2lhbCwgYXF1ZWxsb3MgYXRyaWJ1dG9zIHF1ZSBzZSBkZXJpdmFuIGRlc3B1w6lzIGRlbCBzZWd1bmRvIGRpYWduw7NzdGljbzsgbG9zIGRhdG9zIHNlIGRlc2NyaWJlbiBhIGNvbnRpbnVhY2nDs246DQoNCmBgYHtyLCBtZXNzYWdlID0gRkFMU0UsIHdhcm5pbmcgPSBGQUxTRSwgZWNobyA9IEZBTFNFLCBldmFsID1UUlVFfQ0KZGF0YV9yZWhvc3AgPC0gcmVhZF94bHN4KCJEQVRBX1JFSE9TUC54bHN4IixuYSA9IGMoIm5hIiwgIk5BIiwgIm51bGwiLCAiTlVMTCIpKQ0KZGF0YV9yZWhvc3AgJT4lDQogIHNlbGVjdChFZGFkX0hvc3BpdGFsaXphY2lvbiwNCiAgICAgICAgIEVzdHJhdG9fVml2aWVuZGEsDQogICAgICAgICBSYW5nb19JbmdyZXNvc19EZXNjLA0KICAgICAgICAgRXN0YWRvX0NpdmlsLA0KICAgICAgICAgR2VuZXJvLA0KICAgICAgICAgY2FudGlkYWRfbWFyY2FzLA0KICAgICAgICAgUmFtb19JZCwNCiAgICAgICAgIENpdWRhZF9Db250YWN0b19Ob21icmUsDQogICAgICAgICBDb2RpZ29fRGlhZ25vc3RpY29fT3AsDQogICAgICAgICBDYXRlZ29yaWFfRHhfSWQsDQogICAgICAgICBRdWlydXJnaWNvLA0KICAgICAgICAgRmVjaGFfSW5ncmVzb19Ib3NwLA0KICAgICAgICAgTnVtZXJvX0RpYXNfSG9zcGl0YWxhcmlvLA0KICAgICAgICAgTnVtZXJvX0RpYXNfVWNpLA0KICAgICAgICAgTnVtZXJvX0RpYXNfVWNlLA0KICAgICAgICAgUHJvdmVlZG9yLA0KICAgICAgICAgVmFsb3JfUGFnYWRvX0RpYWdub3N0aWNvLA0KICAgICAgICAgcmVob3NwX2NhdF9vbXMpICU+JQ0KICByZW5hbWUoZWRhZCA9IEVkYWRfSG9zcGl0YWxpemFjaW9uLCANCiAgICAgICAgIGVzdHJhdG8gPSBFc3RyYXRvX1ZpdmllbmRhLA0KICAgICAgICAgaW5ncmVzbyA9IFJhbmdvX0luZ3Jlc29zX0Rlc2MsDQogICAgICAgICBlc3RfY2l2aWwgPSBFc3RhZG9fQ2l2aWwsDQogICAgICAgICBnZW5lcm8gPSBHZW5lcm8sDQogICAgICAgICBtYXJjYXMgPSBjYW50aWRhZF9tYXJjYXMsDQogICAgICAgICByYW1vID0gUmFtb19JZCwNCiAgICAgICAgIGNpdWRhZCA9IENpdWRhZF9Db250YWN0b19Ob21icmUsDQogICAgICAgICBkaWFnbm9zID0gQ29kaWdvX0RpYWdub3N0aWNvX09wLA0KICAgICAgICAgY2F0ZWdvcmlhID0gQ2F0ZWdvcmlhX0R4X0lkLA0KICAgICAgICAgcXVpcnVyID0gUXVpcnVyZ2ljbywNCiAgICAgICAgIGZlY2hhX2luZ3Jlc28gPSBGZWNoYV9JbmdyZXNvX0hvc3AsDQogICAgICAgICBkaWFzX2hvc3AgPSBOdW1lcm9fRGlhc19Ib3NwaXRhbGFyaW8sDQogICAgICAgICBkaWFzX3VjaSA9IE51bWVyb19EaWFzX1VjaSwNCiAgICAgICAgIGRpYXNfdWNlID0gTnVtZXJvX0RpYXNfVWNlLA0KICAgICAgICAgcHJvdmVlZG9yID0gUHJvdmVlZG9yLA0KICAgICAgICAgcGFnb19ob3NwID0gVmFsb3JfUGFnYWRvX0RpYWdub3N0aWNvLA0KICAgICAgICAgcmVob3NwX29tcyA9IHJlaG9zcF9jYXRfb21zKSAtPiBkYXRhX3JlaG9zcA0KaGVhZChkYXRhX3JlaG9zcCkNCmBgYA0KDQo8dWw+DQo8bGk+VmFyaWFibGVzIGNvbnRpbnVhcyAoNCkNCjx1bD4NCjxsaT5kaWFzX2hvc3A6IGTDrWFzIGRlIGhvc3BpdGFsaXphY2nDs248L2xpPg0KPGxpPmRpYXNfdWNpOiBuw7ptZXJvIGTDrWFzIGVuIFVDSTwvbGk+DQo8bGk+ZGlhc191Y2U6IG7Dum1lcm8gZMOtYXMgZW4gVUNFPC9saT4NCjxsaT5wYWdvX2hvc3A6IHZhbG9yIHBhZ2FkbyBwcmltZXJhIGhvc3BpdGFsaXphY2nDs248L2xpPg0KPC91bD4NCjwvbGk+DQo8L3VsPg0KPHVsPg0KPGxpPlZhcmlhYmxlcyBub21pbmFsZXMgKDUpDQo8dWw+DQo8bGk+ZXN0cmF0bzogZXN0cmF0byBWaXZpZW5kYSAoMCwxLDIsMyw0LDUsNiwtMSk8L2xpPg0KPGxpPmVzdF9jaXZpbDogZXN0YWRvIGNpdmlsIChDLEQsUyxVLFYsLTEpPC9saT4NCjxsaT5jaXVkYWQ6IGNpdWRhZCBkZSBjb250YWN0byBkZWwgYXNlZ3VyYWRvPC9saT4NCjxsaT5kaWFnbm9zOiBjw7NkaWdvIGRpYWduw7NzdGljbyBDSUUxMCBkZSBsYSBwcmltZXJhIGF0ZW5jacOzbiA8L2xpPg0KPGxpPmNhdGVnb3JpYTogY2F0ZWdvcsOtYSBkZWwgZGlhZ27Ds3N0aWNvIHNlZ8O6biBlbCB0aXBvIGRlIGVuZmVybWVkYWQ8L2xpPg0KPC91bD4NCjwvbGk+DQo8L3VsPg0KPHVsPg0KPGxpPlZhcmlhYmxlIGRpY290w7NtaWNhICg0KQ0KPHVsPg0KPGxpPmdlbmVybzogZ8OpbmVybyBkZWwgYXNlZ3VyYWRvIChNLEYpPC9saT4NCjxsaT5yYW1vOiByYW1vIGFsIHF1ZSBwZXJ0ZW5lY2UgZWwgYXNlZ3VyYWRvPC9saT4NCjxsaT5xdWlydXI6IHNpIHR1dm8gYWxndW4gdGlwbyBkZSBzZXJ2aWNpbyByZWxhY2lvbmFkbyBhIHByb2NlZGltaWVudG8gcXVpcsO6cmdpY288L2xpPg0KPGxpPnJlaG9zcF9jYXRfb21zOiBzaW1pbGl0dWQgY2F0ZWdvcsOtYSBjaWUxMC4gRXN0YSBlcyBudWVzdHJhIHZhcmlhYmxlIG9iamV0aXZvIDwvbGk+DQo8L3VsPg0KPC9saT4NCjwvdWw+DQo8dWw+DQo8bGk+VmFyaWFibGVzIGRpc2NyZXRhcyAoMikNCjx1bD4NCjxsaT5lZGFkOiBlZGFkIGRlbCBhc2VndXJhZG8gZW4gZWwgbW9tZW50byBkZSBsYSBob3NwaXRhbGl6YWNpw7NuPC9saT4NCjxsaT5tYXJjYXM6IGNhbnRpZGFkIGRlIG1hcmNhcyBjb25maXJtYWRhcyBkZWwgYXNlZ3VyYWRvPC9saT4NCjwvdWw+DQo8L2xpPg0KPC91bD4NCjx1bD4NCjxsaT5WYXJpYWJsZXMgb3JkaW5hbGVzICgxKQ0KPHVsPg0KPGxpPmluZ3Jlc286IHJhbmdvIGRlIGluZ3Jlc29zPC9saT4NCjwvdWw+DQo8L2xpPg0KPC91bD4NCjx1bD4NCjxsaT5GZWNoYSAoMSkNCjx1bD4NCjxsaT5GZWNoYV9JbmdyZXNvOiBmZWNoYSBpbmdyZXNvIGhvc3BpdGFsaXphY2nDs24gPC9saT4NCjwvdWw+DQo8L2xpPg0KPC91bD4NCg0KR2VuZXJhbW9zIGxhIGVzdGFkw61zdGljYSBkZXNjcmlwdGl2YTsgZW4gZWxsYSBzZSBwdWVkZSB2aXN1YWxpemFyIHF1ZSBzZXLDoSBuZWNlc2FyaW8gcmVhbGl6YXIgbcOhcyBhZGVsYW50ZSBhbGd1bmFzIGNvbnZlcnNpb25lcyBlbiBsb3MgdGlwb3MgZGUgZGF0b3MgcXVlIHZpZW5lbiBwb3IgZGVmZWN0byAocG9yIGVqZW1wbG8gZWwgZXN0cmF0byBhcGFyZWNlIGNvbW8gdW5hIHZhcmlhYmxlIG51bcOpcmljYSkuIFBlcm8gYW50ZXMgZGUgY29udGludWFyIGNvbiBsYSBjb2RpZmljYWNpw7NuLCBwcm9jZWRlcmVtb3MgYSBvYnNlcnZhciBjb21vIHNlIGVuY3VlbnRyYW4gbnVlc3RyYXMgdmFyaWFibGVzLg0KDQo8YnI+DQoNCmBgYHtyLCBtZXNzYWdlID0gRkFMU0UsIHdhcm5pbmcgPSBGQUxTRSwgZWNobyA9IEZBTFNFLCBldmFsID1UUlVFfQ0Kc2tpbV93aXRoKG51bWVyaWMgPSBsaXN0KGhpc3QgPSBOVUxMKSkNCg0KZGF0YV9yZWhvc3AgJT4lIA0KICBncm91cF9ieSgpICU+JQ0KICBza2ltKCkNCmBgYA0KDQo8dWw+DQo8bGk+TGEgdmFyaWFibGUgaW5ncmVzbyBlcyBsYSBxdWUgbcOhcyBkYXRvcyBwZXJkaWRvcyB0aWVuZSwgc2VndWlkYSBkZWwgZXN0cmF0by4NCjxsaT5MYSBtYXlvcsOtYSBkZSBsb3MgcGFjaWVudGVzIG5vIGVzdHV2aWVyb24gaW5ncmVzYWRvcyBlbiBlbCBVQ0kgbyBlbiBVQ0UNCjxsaT5FbCBwYWdvIGhvc3BpdGFsYXJpbyBwcm9tZWRpbyBmdWUgZGUgJDUnNzA2LDEwOCBjb24gdW5hIGRlc3ZpYWNpw7NuIGRlICQxMSc0NDcsMTM1IGRlIGxhIG1lZGlhLCBsbyBxdWUgaW5kaWNhIHVuYSBncmFuIGRpc3BlcnNpw7NuIGVuIGxvcyBkYXRvcywgeSBwb3NpYmxlIHByZXNlbmNpYSBkZSBvdXRsaWVycy4NCjxsaT5FbCA3NSUgZGUgbGEgaW5mb3JtYWNpw7NuIGNvcnJlc3BvbmRlIGEgdXN1YXJpb3MgcXVlIG5vIHNlIHJlaG9zcGl0YWxpemFyb24sIHBvciBlbmRlIG51ZXN0cmEgdmFyaWFibGUgb2JqZXRpdm8gc2UgZW5jdWVudHJhIGRlc2JhbGFuY2VhZGENCjx1bD4NCg0KPGJyPg0KDQpBIGNvbnRpbnVhY2lvbiB2ZXJlbW9zIGFsZ3VuYXMgZ3JhZmljYXMgcXVlIHBlcm1pdGVuIHJlYWxpemFyIGluZmVyZW5jaWFzIGFjZXJjYSBkZWwgY29tcG9ydGFtaWVudG8gZGUgbG9zIGRhdG9zOg0KYGBge3IsIG1lc3NhZ2UgPSBGQUxTRSwgd2FybmluZyA9IEZBTFNFLCBlY2hvID0gRkFMU0UsIGV2YWwgPVRSVUUsIGZpZy53aWR0aD04fQ0KcmVxdWlyZShzY2FsZXMpDQoNCmRhdGFfcmVob3NwICU+JQ0KICBmaWx0ZXIocGFnb19ob3NwID4gMCAmIHF1aXJ1ciA9PSAwICYgcmVob3NwX29tcyA9PSAxKSAlPiUNCiAgZ3JvdXBfYnkoZmVjaGFfaW5ncmVzbykgJT4lDQogIHN1bW1hcmlzZV9hbGwofnN1bShwYWdvX2hvc3ApKSAlPiUNCiAgICBnZ3Bsb3QoDQogICAgICBhZXMoDQogICAgICAgIHg9ZmVjaGFfaW5ncmVzbywgDQogICAgICAgIHk9cGFnb19ob3NwKSkgKw0KICAgIGdlb21fbGluZSgNCiAgICAgIGNvbG9yID0gIiM5OUNDRkYiLCANCiAgICAgIHNpemUgPSAwLjMpICsgDQogICAgZ2VvbV9zbW9vdGgobWV0aG9kID0gImxtIikgKyANCiAgICB0aGVtZV9taW5pbWFsKCkgKw0KICAgIGxhYnModGl0bGUgPSAiUGFnbyBIb3NwIGVuIGVsIHRpZW1wbyIsDQogICAgICAgICB4PSAiRmVjaGEgSW5ncmVzbyIsDQogICAgICAgICB5ID0gIlBhZ28gSG9zcCIpICsNCiAgICB0aGVtZShwbG90LnRpdGxlID0gZWxlbWVudF90ZXh0KGhqdXN0ID0gMC41KSwNCiAgICAgICAgICBsZWdlbmQucG9zaXRpb24gPSAibm9uZSIpICsgDQogICAgc2NhbGVfeV9jb250aW51b3VzKGxhYmVscyA9IGRvbGxhcikgLT4gcDExDQoNCnAxMSA8LSBnZ3Bsb3RseShwMTEpDQpwMTENCmBgYA0KDQpgYGB7cn0NCmRhdGFfcmVob3NwICU+JQ0KICBncm91cF9ieShjaXVkYWQpICU+JQ0KICBzdW1tYXJpc2VfYWxsKH5zdW0ocmVob3NwX29tcykpICU+JQ0KICBmaWx0ZXIocmVob3NwX29tcyA+IDgpICU+JQ0KICAgIGdncGxvdCgNCiAgICAgIGFlcyhmaWxsPWNpdWRhZCwNCiAgICAgICAgICB4PWNpdWRhZCwgDQogICAgICAgICAgeT1yZWhvc3Bfb21zKSkgKw0KICAgIGdlb21fYmFyKHN0YXQgPSAiaWRlbnRpdHkiKSArIA0KICAgIHRoZW1lX21pbmltYWwoKSArDQogICAgbGFicyh0aXRsZSA9ICJSZWhvc3BpdGFsaXphY2lvbiBwb3IgY2l1ZGFkIiwNCiAgICAgICAgIHg9ICJDaXVkYWQiLA0KICAgICAgICAgeSA9ICJDYW50LiBSZWhvc3AiKSArDQogICAgdGhlbWUoYXhpcy50ZXh0LnggPSBlbGVtZW50X3RleHQoYW5nbGUgPSA5MCksDQogICAgICAgICAgcGxvdC50aXRsZSA9IGVsZW1lbnRfdGV4dChoanVzdCA9IDAuNSksDQogICAgICAgICAgbGVnZW5kLnBvc2l0aW9uID0gIm5vbmUiKSArDQogICAgc2NhbGVfZmlsbF9icmV3ZXIocGFsZXR0ZSA9ICJCbHVlcyIpLT4gcDEyDQoNCnAxMiA8LSBnZ3Bsb3RseShwMTIpDQpwMTINCg0KYGBgDQoNCmBgYHtyLCBtZXNzYWdlID0gRkFMU0UsIHdhcm5pbmcgPSBGQUxTRSwgZWNobyA9IEZBTFNFLCBldmFsID1UUlVFLCBmaWcud2lkdGg9OCwgZmlnLmhlaWdodD00fQ0KIHJlcXVpcmUoc2NhbGVzKQ0KIA0KZGF0YV9yZWhvc3AgJT4lDQogIGZpbHRlcihyZWhvc3Bfb21zID4gMCkgJT4lDQogIGdyb3VwX2J5KGZlY2hhX2luZ3Jlc28pICU+JQ0KICBzdW1tYXJpc2VfYWxsKH5zdW0ocmVob3NwX29tcykpICU+JQ0KICAgIGdncGxvdCgNCiAgICAgIGFlcygNCiAgICAgICAgeD1mZWNoYV9pbmdyZXNvLCANCiAgICAgICAgeT1yZWhvc3Bfb21zKSkgKw0KICAgIGdlb21fcG9pbnQoY29sb3I9IiM5OUNDRkYiLCANCiAgICAgIHNpemU9MikgKyANCiAgICBnZW9tX3Ntb290aChtZXRob2QgPSAibG0iKSArIA0KICAgIHRoZW1lX21pbmltYWwoKSArDQogICAgbGFicyh0aXRsZSA9ICJOdW1lcm8gUmVob3NwIGVuIGVsIHRpZW1wbyIsDQogICAgICAgIHg9ICJGZWNoYSBSZWhvc3AuIiwNCiAgICAgICAgeSA9ICJOdW0uIFJlaG9zcC4iKSArDQogICB0aGVtZShwbG90LnRpdGxlID0gZWxlbWVudF90ZXh0KGhqdXN0ID0gMC41KSwNCiAgICAgICAgIGxlZ2VuZC5wb3NpdGlvbiA9ICJub25lIikgLT4gcDEzDQogDQpwMTMgPC0gZ2dwbG90bHkocDEzKQ0KcDEzDQpgYGANCg0KW1ZvbHZlciBhbCDDjW5kaWNlXSgjaW5kaWNlKTwvZGl2Pg0KDQo8aHI+DQo8aDIgaWQ9IlBlcmRpZG9zIiBzdHlsZT0idGV4dC1hbGlnbjogY2VudGVyOyIgbWFya2Rvd249IjEiPkdlbmVyYWxpZGFkZXM8L2gyPg0KPGRpdiBzdHlsZT0idGV4dC1hbGlnbjoganVzdGlmeSI+DQoNCkVuIGxhIGdyw6FmaWNhIHNpZ3VpZW50ZSBwb2RlbW9zIG9ic2VydmFyIHF1ZSBoYXkgZW4gdG90YWwgNCB2YXJpYWJsZXMgcXVlIGNvbnRpZW5lbiByZWdpc3Ryb3MgdmFjaW9zOiBlc3RyYXRvLCBlc3RhZG8gY2l2aWwsIGluZ3Jlc28geSBwcm92ZWVkb3IuDQoNCkEgbml2ZWwgaW5kaXZpZHVhbCBlbCBwb3JjZW50YWplIGRlIHZhbG9yZXMgcGVyZGlkb3MgcGFyYSB0b2RvcyBsb3MgY2Fzb3MgZXMgc3VwZXJpb3IgYWwgMjUlLiBEZSBmb3JtYSBjb21iaW5hZGEgaGF5IG3DoXMgZGVsIDMwJSBkZSBjYW1wb3MgdmFjw61vczsgcG9yIGVuZGUgbm8gcG9kZW1vcyBkZWNpciBxdWUgbGEgcHJvYmFiaWxpZGFkIGRlIHF1ZSBmYWx0ZSB1biB2YWxvciBkZXBlbmRlIHNvbG8gZGVsIHZhbG9yIG9ic2VydmFkbywgeSB1c2FyIHVuIG3DqXRvZG8gcGFyYSBpbXB1dGFybG8gKGxhIGZvcm1hIG5vIGVzIGFsZWF0b3JpYSkuDQoNCmBgYHtyLCBtZXNzYWdlID0gRkFMU0UsIHdhcm5pbmcgPSBGQUxTRSwgZXZhbCA9VFJVRSwgZWNobyA9IEZBTFNFfQ0KYWdncihkYXRhX3JlaG9zcCwNCiAgICAgY29sID0gYygiI0NDRTVGRiIsICIjOTlDQ0ZGIiksDQogICAgIGNleC5heGlzID0gMC43LA0KICAgICBwcm9wID0gYyhUUlVFLCBGQUxTRSksDQogICAgIG51bWJlciA9IFRSVUUsDQogICAgIGdhcCA9IDEuNSwNCiAgICAgYm9yZGVyID0gTkEsDQogICAgIGJhcnMgPSBGQUxTRSwNCiAgICAgeWxhYiA9IGMoIlByb3BvcmNpw7NuIGRlIERhdG9zIFBlcmRpZG9zIiwgIkNvbWJpbmFjaW9uZXMiKSkNCmBgYA0KDQpEYWRvIGxvIGFudGVyaW9yLCBzZSBoYWNlIG5lY2VzYXJpbyBjb25zdHJ1aXIgdW5hIHRlcmNlcmEgY2F0ZWdvcsOtYSwgcG9yIGxvIG1lbm9zIHBhcmEgbGFzIHZhcmlhYmxlcyBxdWUgcG9zZWVuIG1lbm9zIGNhbXBvcyB2YWPDrW9zIChlc3RyYXRvIHkgZXN0YWRvIGNpdmlsKS4NCg0KUGFyYSBlc3RpbWFyIHNpIGV4aXN0ZSB1bmEgYXNvY2lhY2nDs24gZW50cmUgbGFzIHZhcmlhYmxlcyBxdWUgcHVlZGEgZGVyaXZhcnNlIGVuIGNvbGluZWFsaWRhZCwgc2UgcHJvY2VkZSBwcmltZXJvIGEgdmVyaWZpY2FyIHF1ZSBsYXMgdmFyaWFibGVzIG5vIHBvc2VlbiB1bmEgZGlzdHJpYnVjacOzbiBub3JtYWwsIHVuYSB2ZXogcmVhbGl6YWRvIGVzdG8sIHNlIGVsaWdlIGVsIHRlc3QgZGUgU3BlYXJtYW4gcGFyYSBoYWxsYXIgbGEgY29ycmVsYWNpw7NuIGxpbmVhbCBwb3IgYXRyaWJ1dG8uDQoNCmBgYHtyLCBtZXNzYWdlID0gRkFMU0UsIHdhcm5pbmcgPSBGQUxTRSwgZWNobyA9IEZBTFNFLCBldmFsID1UUlVFfQ0KZGF0YV9yZWhvc3AgJT4lDQogIHNlbGVjdChwYWdvX2hvc3AsIA0KICAgICAgICAgZGlhc191Y2ksDQogICAgICAgICBkaWFzX3VjZSwNCiAgICAgICAgIGRpYXNfaG9zcCwNCiAgICAgICAgIHJlaG9zcF9vbXMpIC0+IGRhdGFfbnVtDQoNCm5vcm1fdGVzdCA8LSBsYXBwbHkoZGF0YV9udW0sIGxpbGxpZS50ZXN0KQ0KbHJlcyA8LSBzYXBwbHkobm9ybV90ZXN0LCBgW2AsIGMoInN0YXRpc3RpYyIsInAudmFsdWUiKSkNCnQobHJlcykNCmBgYA0KDQpMb3MgcmVzdWx0YWRvcyBjb25maXJtYW4gcXVlIG5pbmd1bmEgZGUgbGFzIHZhcmlhYmxlcyBwZXNlbnRhIHVuYSBkaXN0cmlidWNpw7NuIG5vcm1hbCB5IGxhcyBjb3JyZWxhY2lvbmVzIHJlbGFjaW9uYWRhcyBhIGNvbnRpbnVhY2nDs24sIHZlcmlmaWNhbiBwb3NpYmxlcyBhc29jaWFjaW9uZXMgZW50cmUgbGFzIHZhcmlhYmxlcyBkZSBsb3MgZMOtYXMgZW4gcXVlIGVsIHBhY2llbnRlIGVzdHV2byBpbnRlcm5hZG8gZW4gbGEgVW5pZGFkIGRlIEN1aWRhZG9zIEludGVuc2l2b3MsIGVuIGxhIFVuaWRhZCBkZSBDdWlkYWRvcyBFc3BlY2lhbGVzIHkgbG9zIGTDrWFzIHF1ZSBlbCBwYWNpZW50ZSBlc3R1dm8gaG9zcGl0YWxpemFkby4gUG9yIGNvbm9jaW1pZW50byBkZSBmYWN0bywgbGEgcmVsYWNpw7NuIGVudHJlIGxhIHZhcmlhYmxlICJkaWFzX3VjaSIgeSAiZGlhc191Y2UiIGVzIGVudGVuZGlibGUsIHlhIHF1ZSBjdWFuZG8gdW4gcGFjaWVudGUgcXVlIGhhIHBhc2FkbyBwb3IgbGEgVW5pZGFkIGRlIEN1aWRhZG9zIEludGVuc2l2b3MgcGFzw7Mgc3UgbW9tZW50byBkZSBjcmlzaXMgeSBzdSBlc3RhZG8gZGUgc2FsdWQgZXMgbcOhcyBlc3RhYmxlLCBzdWVsZSBzZXIgcmVtaXRpZG8gYSBsYSBVbmlkYWQgZGUgQ3VpZGFkb3MgRXNwZWNpYWxlcy4gDQoNCmBgYHtyLCBtZXNzYWdlID0gRkFMU0UsIHdhcm5pbmcgPSBGQUxTRSwgZWNobyA9IEZBTFNFLCBldmFsID1UUlVFfQ0KY29ycl9udW0gPC0gcm91bmQoY29yKGRhdGFfbnVtKSw0KQ0KcC5tYXQgPC0gY29yX3BtYXQoZGF0YV9udW0sIG1ldGhvZCA9ICJzcGVhcm1hbiIpDQoNCmdnY29ycnBsb3QoY29ycl9udW0sIA0KICAgICAgICAgICB0eXBlID0gImxvd2VyIiwNCiAgICAgICAgICAgb3V0bGluZS5jb2wgPSAid2hpdGUiLA0KICAgICAgICAgICBwLm1hdCA9IHAubWF0LA0KICAgICAgICAgICBzaWcubGV2ZWwgPSAwLjA1LA0KICAgICAgICAgICBnZ3RoZW1lID0gZ2dwbG90Mjo6dGhlbWVfbWluaW1hbCwNCiAgICAgICAgICAgbGFiID0gVFJVRSwNCiAgICAgICAgICAgY29sb3JzID0gYygiIzk5Q0NGRiIsICJ3aGl0ZSIsICIjMDA2NkNDIikpICsgDQogIGxhYnModGl0bGUgPSAiQ29ycmVsYWNpb24gZW50cmUgdmFyaWFibGVzIG51bcOpcmljYXMiKQ0KYGBgDQoNClNpbiBlbWJhcmdvLCBsYXMgY29ycmVsYWNpb25lcyBvYnRlbmlkYXMgbm8gY3VtcGxlbiB1biB1bWJyYWwgc3VmaWNpZW50ZSBwYXJhIGNvbnNpZGVyYXJsYXMgaW1wb3J0YW50ZXMsIHBvciBlbmRlIHNlIHByb2NlZGUgYSBjb25zZXJ2YXJsYXMgeSBldmFsdWFyIG3DoXMgYWRlbGFudGUgc2kgZXMgcHJlY2lzbyBlbGltaW5hcmxhcyBkZWZpbml0aXZhbWVudGUuIFBvciBvdHJvIGxhZG8sIGxhIHZhcmlhYmxlIGNhdGVnb3LDrWEgeSBkaWFnbsOzc3RpY28gZXN0w6FuIGFsdGFtZW50ZSBjb3JyZWxhY2lvbmFkYXMgY29uIGxhIHZhcmlhYmxlIGVuZMOzZ2VuYSwgcG9yIGxvIHF1ZSBlcyBuZWNlc2FyaW8gZWxpbWluYXJsYXMgZGVsIGFuw6FsaXNpcywgcGFyYSBubyBpbmN1cnJpciBlbiBwb3NpYmxlcyBzb2JyZWFqdXN0ZXMgZW4gbGEgZXRhcGEgZGUgbW9kZWxhZG8uDQoNCkNvbW8gc2UgaGFiw61hIG1lbmNpb25hZG8gYW50ZXJpb3JtZW50ZSwgdGVuaWVuZG8gZW4gY3VlbnRhIGVsIGFuw6FsaXNpcyBkZSBkYXRvcyBwZXJkaWRvcyBvIG51bG9zLCBzZSBkZWNpZGUgZGVzY2FydGFyIGxhIHZhcmlhYmxlIGluZ3Jlc28geWEgcXVlIGNvbnRpZW5lIG1hcyBkZSB1biAzMCUgZW4gZGF0b3MgcGVyZGlkb3MuDQoNCmBgYHtyLCBtZXNzYWdlID0gRkFMU0UsIHdhcm5pbmcgPSBGQUxTRSwgZWNobyA9IEZBTFNFLCBldmFsID1UUlVFfQ0KDQpkYXRhX3JlaG9zcCAlPiUNCiAgbXV0YXRlKGVzdHJhdG8gPSBpZmVsc2UoaXMubmEoZXN0cmF0bykgfCBlc3RyYXRvID09IC0xIHwgZXN0cmF0byA9PSAwLCAiU2luIEluZm9ybWFjaW9uIiwgZXN0cmF0byksDQogICAgICAgICBlc3RfY2l2aWwgPSBpZmVsc2UoaXMubmEoZXN0X2NpdmlsKSwgIlNpbiBJbmZvcm1hY2lvbiIsIGVzdF9jaXZpbCksDQogICAgICAgICBpbmdyZXNvID0gaWZlbHNlKGlzLm5hKGluZ3Jlc28pLCAiU2luIEluZm9ybWFjaW9uIiwgaW5ncmVzbyksDQogICAgICAgICBwcm92ZWVkb3IgPSBpZmVsc2UoaXMubmEocHJvdmVlZG9yKSwgIlNpbiBJbmZvcm1hY2lvbiIsIHByb3ZlZWRvciksDQogICAgICAgICBxdWlydXIgPSBpZmVsc2UocXVpcnVyID09IDEsICdTaScsICdObycpLA0KICAgICAgICAgZWRhZCA9IGNhc2Vfd2hlbiggZWRhZCA8PSAzMCB+ICIxOC0zMCIsDQogICAgICAgICAgICAgICAgICAgICAgICAgICBlZGFkID49IDMxICYgZWRhZCA8PSA0MCB+ICIzMS00MCIsDQogICAgICAgICAgICAgICAgICAgICAgICAgICBlZGFkID49IDQxICYgZWRhZCA8PSA1MCB+ICI0MS01MCIsDQogICAgICAgICAgICAgICAgICAgICAgICAgICBlZGFkID49IDUxICYgZWRhZCA8PSA2MCB+ICI1MS02MCIsDQogICAgICAgICAgICAgICAgICAgICAgICAgICBlZGFkID49IDYxICYgZWRhZCA8PSA3MCB+ICI2MS03MCIsDQogICAgICAgICAgICAgICAgICAgICAgICAgICBlZGFkID49IDcxICYgZWRhZCA8PSA4MCB+ICI3MS04MCIsDQogICAgICAgICAgICAgICAgICAgICAgICAgICBlZGFkID49IDgxIH4gIjgxKyIpLA0KICAgICAgICAgbWFyY2FzID0gY3V0KG1hcmNhcywgYnJlYWtzID0gKDA6MykqMiwgaW5jbHVkZS5sb3dlc3QgPSBUUlVFKSwNCiAgICAgICAgIGVzdF9jaXZpbCA9IGFzLmZhY3Rvcihlc3RfY2l2aWwpLA0KICAgICAgICAgZ2VuZXJvID0gYXMuZmFjdG9yKGdlbmVybyksDQogICAgICAgICBxdWlydXIgPSBhcy5mYWN0b3IocXVpcnVyKSwNCiAgICAgICAgIHJhbW8gPSBhcy5mYWN0b3IocmFtbyksDQogICAgICAgICBlZGFkID0gYXMuZmFjdG9yKGVkYWQpLA0KICAgICAgICAgZXN0cmF0byA9IGFzLmZhY3Rvcihlc3RyYXRvKSkgJT4lDQogIHNlbGVjdCgtZGlhZ25vcywgLWNhdGVnb3JpYSwgLWZlY2hhX2luZ3Jlc28sIC1pbmdyZXNvLCAtcHJvdmVlZG9yLCAtY2l1ZGFkKSAtPiBkYXRhX3JlaG9zcA0KDQpzdHIoZGF0YV9yZWhvc3ApDQpgYGANCg0KW1ZvbHZlciBhbCDDjW5kaWNlXSgjaW5kaWNlKTwvZGl2Pg0KDQo8aHI+DQo8aDIgaWQ9IkFuYWxpc2lzIiBzdHlsZT0idGV4dC1hbGlnbjogY2VudGVyOyIgbWFya2Rvd249IjEiPkFuw6FsaXNpcyBFeHBsb3JhdG9yaW88L2gyPg0KDQo8aDMgaWQ9IkFuYWxpc2lzQ29uIiBzdHlsZT0idGV4dC1hbGlnbjogY2VudGVyOyJtYXJrZG93bj0iMSI+QW7DoWxpc2lzIHVuaXZhcmlhZG8gLSB2YXJpYWJsZXMgY29udGludWFzPC9oMz4NCjxkaXYgc3R5bGU9InRleHQtYWxpZ246IGp1c3RpZnkiPg0KDQpFcyBldmlkZW50ZSBsYSBleGlzdGVuY2lhIHRhbWJpw6luLCBkZSB2YWxvcmVzIGF0w61waWNvcyBtdXkgbWFyY2Fkb3MgdGFudG8gZW4gZWwgbnVtw6lybyBkZSBkw61hcyBkZSBob3NwaXRhbGl6YWNpw7NuLCBjb21vIGVuIGxvcyBuw7ptZXJvcyBkZSBkw61hcyBxdWUgZWwgcGFjaWVudGUgZXN0dXZvIGVuIGxhIFVuaWRhZCBkZSBDdWlkYWRvIEludGVuc2l2byB5IEVzcGVjaWFsLCBlbiBkw7NuZGUgbG9zIHZhbG9yZXMgYXTDrXBpY29zIG3DoXMgZ3JhbmRlcyBzdWNlZGVuIGVuIGxvcyBldmVudG9zIHF1ZSBubyBkZXNlbmNhZGVuYXJvbiBlbiByZWhvc3BpdGFsaXphY2nDs24uDQoNCmBgYHtyLCBtZXNzYWdlID0gRkFMU0UsIHdhcm5pbmcgPSBGQUxTRSwgZWNobyA9IEZBTFNFLCBldmFsID1UUlVFfQ0KDQpkYXRhX3JlaG9zcCAlPiUNCiAgZmlsdGVyKGRpYXNfdWNpID4gMCkgJT4lDQogIGdncGxvdCAoLiwgYWVzICggZGlhc191Y2ksIGNvbG9yID0gYXMuZmFjdG9yKHJlaG9zcF9vbXMpKSkgKw0KICBnZW9tX2hpc3RvZ3JhbShmaWxsPSJ3aGl0ZSIsIGFscGhhPTAuNSwgcG9zaXRpb249ImlkZW50aXR5IikgKw0KICB0aGVtZV9taW5pbWFsKCkgKw0KICBsYWJzKHggPSAiRMOtYXMgVUNJIiwgDQogICAgICAgeSA9ICJGcmVjdWVuY2lhIFJlbGF0aXZhIiwgDQogICAgICAgZmlsbCA9ICIgIikgKw0KICBnZ3RpdGxlKCJEw61hcyBlbiBVbmlkYWQgZGUgQ3VpZGFkb3MiKSArDQogIHRoZW1lKHBsb3QudGl0bGUgPSBlbGVtZW50X3RleHQoaGp1c3QgPSAwLjUpKSArIA0KICAgIHNjYWxlX2NvbG91cl9icmV3ZXIocGFsZXR0ZSA9ICJQYWlyZWQiKSArDQogIHRoZW1lKGxlZ2VuZC5wb3NpdGlvbiA9ICJub25lIikgLT4gcDENCg0KZGF0YV9yZWhvc3AgJT4lDQogIGZpbHRlcihkaWFzX3VjZSA+IDApICU+JQ0KICBnZ3Bsb3QgKC4sIGFlcyAoIGRpYXNfdWNlLCBjb2xvciA9IGFzLmZhY3RvcihyZWhvc3Bfb21zKSkpICsNCiAgZ2VvbV9oaXN0b2dyYW0oZmlsbD0id2hpdGUiLCBhbHBoYT0wLjUsIHBvc2l0aW9uPSJpZGVudGl0eSIpICsNCiAgdGhlbWVfbWluaW1hbCgpICsNCiAgbGFicyh4ID0gIkTDrWFzIFVDRSIsIA0KICAgICAgIHkgPSAiRnJlY3VlbmNpYSBSZWxhdGl2YSIsIA0KICAgICAgIGZpbGwgPSAiUmVob3NwaXRhbGl6YWNpw7NuIikgKw0KICBnZ3RpdGxlKCJOw7ptZXJvIGRlIGTDrWFzIGVuIFVuaWRhZCBkZSBDdWlkYWRvcyIpICsNCiAgdGhlbWUocGxvdC50aXRsZSA9IGVsZW1lbnRfdGV4dChoanVzdCA9IDAuNSkpICsgDQogICAgc2NhbGVfY29sb3VyX2JyZXdlcihwYWxldHRlID0gIlBhaXJlZCIpICsNCiAgdGhlbWUobGVnZW5kLnBvc2l0aW9uID0gInJpZ2h0IikgLT4gcDINCg0KcDEgPC0gZ2dwbG90bHkocDEpDQpwMiA8LSBnZ3Bsb3RseShwMikNCg0Kc3VicGxvdChwMSwgcDIsIHRpdGxlWCA9IFRSVUUsIHRpdGxlWSA9IFRSVUUpICU+JQ0KICBsYXlvdXQoc2hvd2xlZ2VuZCA9IChGQUxTRSkpDQpgYGANCg0KQ29uIGVsIGFuw6FsaXNpcyBhbnRlcmlvciBubyBzw7NsbyBzZSBsb2dyYSBpZGVudGlmaWNhciBsYSBwcmVzZW5jaWEgZGUgdmFsb3JlcyBhdMOtcGljb3MsIHNpbm8gcXVlIHRhbWJpw6luIGVzIHBvc2libGUgZXZpZGVuY2lhciBxdWUgbG9zIGRhdG9zIHNlIGVuY3VlbnRyYW4gYWx0YW1lbnRlIGRlc2JhbGFuY2VhZG9zLiBFbiBlbCBjYXNvIGRlIGxvcyBvdXRsaWVycyBzZSB0cnVuY2Fyw6EgZW4gbG9zIGNhc29zIGVuIHF1ZSBzZWEgbmVjZXNhcmlvLCBpbXB1dGFuZG8gbG9zIHZhbG9yZXMgcXVlIHN1cGVyZW4gY2llcnRvIGzDrW1pdGUgZW4gZWwgcGVyY2VudGlsLCB0YW50byBtYXlvciBjb21vIG1lbm9yLg0KDQpgYGB7ciwgbWVzc2FnZSA9IEZBTFNFLCB3YXJuaW5nID0gRkFMU0UsIGVjaG8gPSBGQUxTRSwgZXZhbCA9VFJVRX0NCmRhdGFfcmVob3NwICU+JQ0KICBtdXRhdGUocGFnb19ob3NwID0gaWZlbHNlKHF1aXJ1ciA9PSAiU2kiICYgcmVob3NwX29tcyA9PSAwLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICBvdXRsaWVyKG15ZGF0YSA9IGZpbHRlcihkYXRhX3JlaG9zcCwgcXVpcnVyID09ICJTaSIgJiByZWhvc3Bfb21zID09IDApLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHZhbHVlID0gInBhZ29faG9zcCIsIHFfbWluID0gMCwgcV9tYXggPSAwLjk3KSwgcGFnb19ob3NwKSwNCiAgICAgICAgIHBhZ29faG9zcCA9IGlmZWxzZShxdWlydXIgPT0gIlNpIiAmIHJlaG9zcF9vbXMgPT0gMSwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgb3V0bGllcihteWRhdGEgPSBmaWx0ZXIoZGF0YV9yZWhvc3AsIHF1aXJ1ciA9PSAiU2kiICYgcmVob3NwX29tcyA9PSAxKSwNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHZhbHVlID0gInBhZ29faG9zcCIsIHFfbWluID0gMCwgcV9tYXggPSAwLjk4KSwgcGFnb19ob3NwKSwNCiAgICAgICAgIHBhZ29faG9zcCA9IGlmZWxzZShxdWlydXIgPT0gIk5vIiAmIHJlaG9zcF9vbXMgPT0gMCwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgb3V0bGllcihteWRhdGEgPSBmaWx0ZXIoZGF0YV9yZWhvc3AsIHF1aXJ1ciA9PSAiTm8iICYgcmVob3NwX29tcyA9PSAwKSwgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICB2YWx1ZSA9ICJwYWdvX2hvc3AiLCBxX21pbiA9IDAsIHFfbWF4ID0gMC45NyksIHBhZ29faG9zcCksIA0KICAgICAgICAgcGFnb19ob3NwID0gaWZlbHNlKHF1aXJ1ciA9PSAiTm8iICYgcmVob3NwX29tcyA9PSAxLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICBvdXRsaWVyKG15ZGF0YSA9IGZpbHRlcihkYXRhX3JlaG9zcCwgcXVpcnVyID09ICJObyIgJiByZWhvc3Bfb21zID09IDEpLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHZhbHVlID0gInBhZ29faG9zcCIsIHFfbWluID0gMCwgcV9tYXggPSAwLjk4KSwgcGFnb19ob3NwKSwNCiAgICAgICAgIGRpYXNfaG9zcCA9IGlmZWxzZShyZWhvc3Bfb21zID09IDAsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgIG91dGxpZXIobXlkYXRhID0gZmlsdGVyKGRhdGFfcmVob3NwLCByZWhvc3Bfb21zID09IDApLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICB2YWx1ZSA9ICJkaWFzX2hvc3AiLCBxX21pbiA9IDAsIHFfbWF4ID0gMC45OSksDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgb3V0bGllcihteWRhdGEgPSBmaWx0ZXIoZGF0YV9yZWhvc3AsIHJlaG9zcF9vbXMgPT0gMSksIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHZhbHVlID0gImRpYXNfaG9zcCIsIHFfbWluID0gMCwgcV9tYXggPSAwLjk5KSksDQogICAgICAgICBkaWFzX3VjaSA9IGlmZWxzZShyZWhvc3Bfb21zID09IDAsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgb3V0bGllcihteWRhdGEgPSBmaWx0ZXIoZGF0YV9yZWhvc3AsIHJlaG9zcF9vbXMgPT0gMCAmIGRpYXNfdWNpID4gMCksIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHZhbHVlID0gImRpYXNfdWNpIiwgcV9taW4gPSAwLCBxX21heCA9IDAuOTk5KQ0KICAgICAgICAgICAgICAgICAgICAgICAgICAgLCBkaWFzX3VjaSksDQogICAgICAgICBkaWFzX3VjZSA9IGlmZWxzZShyZWhvc3Bfb21zID09IDAsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgb3V0bGllcihteWRhdGEgPSBmaWx0ZXIoZGF0YV9yZWhvc3AsIHJlaG9zcF9vbXMgPT0gMCAmIGRpYXNfdWNlID4gMCksIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHZhbHVlID0gImRpYXNfdWNlIiwgcV9taW4gPSAwLCBxX21heCA9IDAuOTk5KQ0KICAgICAgICAgICAgICAgICAgICAgICAgICAgLCBkaWFzX3VjaSkpIC0+IGRhdGFfcmVob3NwDQpgYGANCg0KDQpgYGB7ciwgbWVzc2FnZSA9IEZBTFNFLCB3YXJuaW5nID0gRkFMU0UsIGVjaG8gPSBGQUxTRSwgZXZhbCA9VFJVRX0NCg0KcDMgPC0gbXlib3hwbG90KG15ZGF0YSA9IGZpbHRlcihkYXRhX3JlaG9zcCwgcGFnb19ob3NwID4gMCksIA0KICAgICAgICAgICAgICAgIG15ZXhwb3N1cmUgPSAicmVob3NwX29tcyIsIA0KICAgICAgICAgICAgICAgIG15b3V0Y29tZSA9ICJwYWdvX2hvc3AiLCANCiAgICAgICAgICAgICAgICBteXRpdGxlID0gIlBhZ28gaG9zcGl0YWxpemFjacOzbiIsIA0KICAgICAgICAgICAgICAgIG15bGFiZWxfeCA9ICIiLCANCiAgICAgICAgICAgICAgICBteWxhYmVsX3kgPSAiUGFnbyBEaWFnIiwgDQogICAgICAgICAgICAgICAgbXlfZmlsbCA9ICIiKQ0KDQpwNCA8LSBteWJveHBsb3QobXlkYXRhID0gZGF0YV9yZWhvc3AsIA0KICAgICAgICAgICAgICAgIG15ZXhwb3N1cmUgPSAicmVob3NwX29tcyIsIA0KICAgICAgICAgICAgICAgIG15b3V0Y29tZSA9ICJkaWFzX2hvc3AiLCANCiAgICAgICAgICAgICAgICBteXRpdGxlID0gIlRvdGFsIGRpYXMgaG9zcGl0YWxpemFkbyIsIA0KICAgICAgICAgICAgICAgIG15bGFiZWxfeCA9ICIiLCANCiAgICAgICAgICAgICAgICBteWxhYmVsX3kgPSAiRGlhcyBob3NwaXRhbGl6YWNpw7NuIiwgDQogICAgICAgICAgICAgICAgbXlfZmlsbCA9ICIiKQ0KDQpwNSA8LSBteWJveHBsb3QobXlkYXRhID0gZmlsdGVyKGRhdGFfcmVob3NwLCBkaWFzX3VjaSA+IDApLCANCiAgICAgICAgICAgICAgICBteWV4cG9zdXJlID0gInJlaG9zcF9vbXMiLCANCiAgICAgICAgICAgICAgICBteW91dGNvbWUgPSAiZGlhc191Y2kiLCANCiAgICAgICAgICAgICAgICBteXRpdGxlID0gICJUb3RhbCBkw61hcyBVQ0kiLCANCiAgICAgICAgICAgICAgICBteWxhYmVsX3ggPSAiIiwgDQogICAgICAgICAgICAgICAgbXlsYWJlbF95ID0gIkRpYXMgVUNJIiwgDQogICAgICAgICAgICAgICAgbXlfZmlsbCA9ICIiKQ0KDQpwNiA8LSBteWJveHBsb3QobXlkYXRhID0gZmlsdGVyKGRhdGFfcmVob3NwLCBkaWFzX3VjZSA+IDApLCANCiAgICAgICAgICAgICAgICBteWV4cG9zdXJlID0gInJlaG9zcF9vbXMiLCANCiAgICAgICAgICAgICAgICBteW91dGNvbWUgPSAiZGlhc191Y2UiLCANCiAgICAgICAgICAgICAgICBteXRpdGxlID0gIlRvdGFsIGTDrWFzIFVDRSIsIA0KICAgICAgICAgICAgICAgIG15bGFiZWxfeCA9ICIiLCANCiAgICAgICAgICAgICAgICBteWxhYmVsX3kgPSAiRGlhcyBVQ0UiLCANCiAgICAgICAgICAgICAgICBteV9maWxsID0gIiIpDQoNCnAzIDwtIGdncGxvdGx5KHAzKQ0KcDQgPC0gZ2dwbG90bHkocDQpDQpwNSA8LSBnZ3Bsb3RseShwNSkNCnA2IDwtIGdncGxvdGx5KHA2KQ0KDQpzdWJwbG90KHA1LCBwNiwgcDMsIHA0LCANCiAgICAgICAgbnJvd3MgPSAyLCBuY29sKDIpLCANCiAgICAgICAgdGl0bGVYID0gVFJVRSwgdGl0bGVZID0gVFJVRSkgJT4lDQogIGxheW91dChzaG93bGVnZW5kID0gKEZBTFNFKSkNCg0KDQoNCmBgYA0KDQpTZSBwdWVkZSBvYnNlcnZhciBxdWUgZW4gbGEgdmFyaWFibGUgZMOtYXMgVUNJLCBjb3JyZXNwb25kaWVudGUgYWwgcHJpbWVyIGRpYWduw7NzdGljbywgbm8gcGFyZWNlIGhhYmVyIHVuYSBkaWZlcmVuY2lhIHNpZ25pZmljYXRpdmEgZW4gbGEgZGlzdHJpYnVjacOzbiBhbCBkaXNjcmltaW5hciBwb3IgbGEgdmFyaWFibGUgb2JqZXRpdm8gYmluYXJpYSwgZXMgZGVjaXIsIGVudHJlIGxvcyBjYXNvcyBkZSByZWhvc3BpdGFsaXphY2nDs24gKDEpIHkgY2Fzb3MgZGUgbm8gcmVob3NwaXRhbGl6YWNpw7NuICgwKS4gQWRpY2lvbmFsbWVudGUsIGxhIGRpc3RpYnVjacOzbiBlbiBhbWJhcyB2YXJpYWJsZXMgbm8gZXMgc2ltw6l0cmljYS4gDQoNCkEgcGVzYXIgZGUgcXVlIGxvcyBkYXRvcyBzZSBlbmN1ZW50cmFuIGJhc3RhbnRlIGRpc3BlcnNvcywgc2UgbG9ncmEgaWRlbnRpZmljYXIgZGlmZXJlbmNpYXMgZW4gbGEgdmFyaWFibGUgZGVsIHBhZ28gLWNvbiB2YWxvcmVzIG3DoXMgYWx0b3MgZW4gbG9zIGNhc28gZW4gcXVlIG5vIHRlcm1pbsOzIGRlIGJ1ZXZvIGhvc3BpdGFsaXphZG8sIHkgZW4gZWwgY2Fzw7MgZGVsIG7Dum1lcm8gZGUgZMOtYXMgaG9zcGl0YWxpemFkbyBsb3MgcmFuZ29zIHNvbiBtdWNobyBtw6FzIHBlcXVlw7FvcyBjdWFuZG8gaGF5IHVuYSByZWhvc3BpdGFsaXphY2nDs24uDQoNCjxocj4NCjxoMyBpZD0iQW5hbGlzaXNDYXIic3R5bGU9InRleHQtYWxpZ246IGNlbnRlcjsiIG1hcmtkb3duID0gIjEiPkFuw6FsaXNpcyB2YXJpYWJsZXMgY2F0ZWfDs3JpY2FzPC9oMz4NCjxkaXYgc3R5bGU9InRleHQtYWxpZ246IGp1c3RpZnkiPg0KDQpPYnNlcnZhbmRvIGxhcyB2YXJpYWJsZXMgY2F0ZWfDs3JpY2FzIGxhIGRpZmVyZW5jaWEgZW50cmUgbGEgcHJvYmFiaWxpZGFkIGRlIHF1ZSBlbCBldmVudG8gb2N1cnJhIChoYXlhIHJlaG9zcGl0YWxpemFjacOzbikgbyBubywgc2UgcHVlZGUgZXZpZGVuY2lhciBzw7NsbyBlbiBhbGd1bmFzIGNsYXNlcyBwb3IgY2F0ZWdvcsOtYSwgcGVybyBlbiBnZW5lcmFsLCBsYXMgcHJvcG9yY2lvbmVzIHN1ZWxlbiBzZXIgYmFzdGFudGVzIHNpbWlsYXJlcywgcG9yIGxvIHF1ZSBubyBlcyBwb3NpYmxlIGVsYWJvcmFyIGEgcHJpb3JpIHVuYSBoaXDDs3Rlc2lzIHF1ZSBlc3RpcHVsZSBkaWZlcmVuY2lhcyBzaWduaWZpY2F0aXZhcyBlbiBsYXMgZGlzdHJpYnVjaW9uZXMsIHBvciBsbyBtZW5vcyBwYXJhIG5pbmd1bmEgZGUgbGFzIGRvcyB2YXJpYWJsZXMgcmVsYWNpb25hZGFzIGVuIGVsIGdyw6FmaWNvIGEgY29udGludWFjacOzbi4NCg0KYGBge3IsIG1lc3NhZ2UgPSBGQUxTRSwgd2FybmluZyA9IEZBTFNFLCBlY2hvID0gRkFMU0UsIGV2YWwgPVRSVUV9DQoNCnA3IDwtIG15Z2VvbV9iYXIobXlkYXRhID0gZGF0YV9yZWhvc3AsIA0KICAgICAgICAgICAgICAgICBteWV4cG9zdXJlID0gImVkYWQiLCANCiAgICAgICAgICAgICAgICAgbXlvdXRjb21lID0gInJlaG9zcF9vbXMiLCANCiAgICAgICAgICAgICAgICAgbXl0aXRsZSA9ICJFZGFkIiwgDQogICAgICAgICAgICAgICAgIG15bGFiZWxfeCA9ICIiLCANCiAgICAgICAgICAgICAgICAgbXlsYWJlbF95ID0gIkZyZWN1ZW5jaWEiLCANCiAgICAgICAgICAgICAgICAgbXlfZmlsbCA9ICJSZWhvc3BpdGFsaXphY2nDs24iLCANCiAgICAgICAgICAgICAgICAgbXlfYW5nbGUgPSBOVUxMLA0KICAgICAgICAgICAgICAgICBteV9sZWdlbmQgPSAicmlnaHQiKQ0KDQpwOCA8LSBteWdlb21fYmFyKG15ZGF0YSA9IGRhdGFfcmVob3NwLCANCiAgICAgICAgICAgICAgICAgIG15ZXhwb3N1cmUgPSAiZXN0cmF0byIsIA0KICAgICAgICAgICAgICAgICAgbXlvdXRjb21lID0gInJlaG9zcF9vbXMiLCANCiAgICAgICAgICAgICAgICAgIG15dGl0bGUgPSAiRXN0cmF0byIsIA0KICAgICAgICAgICAgICAgICAgbXlsYWJlbF94ID0gIiIsIA0KICAgICAgICAgICAgICAgICAgbXlsYWJlbF95ID0gIkZyZWN1ZW5jaWEiLCANCiAgICAgICAgICAgICAgICAgIG15X2ZpbGwgPSAiUmVob3NwaXRhbGl6YWNpw7NuIiwgDQogICAgICAgICAgICAgICAgICBteV9hbmdsZSA9IE5VTEwsDQogICAgICAgICAgICAgICAgICBteV9sZWdlbmQgPSAibm9uZSIpDQoNCmdyaWQuYXJyYW5nZShwNywNCiAgICAgICAgICAgICBwOCkNCg0KYGBgDQoNClBvciBvdHJvIGxhZG8sIGVsIGF0cmlidXRvIHF1ZSBpbmRpY2EgZWwgaGVjaG8gZGUgcXVlIHNlIGhheWFuIHJlYWxpemFkbyBwcm9jZWRpbWllbnRvcyBxdWlyw7pyZ2ljb3MgZHVyYW50ZSBsYSBwcmltZXJhIGhvc3BpdGFsaXphY2nDs24gbXVlc3RyYW4gY2llcnRhIGRpZmVyZW5jaWEgZW4gbGEgZGlzdHJpYnVpw7NuIHBvciBncnVwbzsgZXMgbcOhcyBwcm9iYWJsZSBxdWUgbGEgcGVyc29uYSBkZWJhIHNlciByZWhvc3BpdGFsaXphZGEgZGUgbnVldm8uDQoNCmBgYHtyLCBtZXNzYWdlID0gRkFMU0UsIHdhcm5pbmcgPSBGQUxTRSwgZWNobyA9IEZBTFNFLCBldmFsID1UUlVFfQ0KDQpwOSA8LSBteWdlb21fYmFyKG15ZGF0YSA9IGRhdGFfcmVob3NwLCANCiAgICAgICAgICAgICAgICAgIG15ZXhwb3N1cmUgPSAicXVpcnVyIiwgDQogICAgICAgICAgICAgICAgICBteW91dGNvbWUgPSAicmVob3NwX29tcyIsIA0KICAgICAgICAgICAgICAgICAgbXl0aXRsZSA9ICJQcm9jIHF1aXLDunJnaWNvIiwgDQogICAgICAgICAgICAgICAgICBteWxhYmVsX3ggPSAiIiwgDQogICAgICAgICAgICAgICAgICBteWxhYmVsX3kgPSAiRnJlY3VlbmNpYSIsIA0KICAgICAgICAgICAgICAgICAgbXlfZmlsbCA9ICJSZWhvc3BpdGFsaXphY2nDs24iLCANCiAgICAgICAgICAgICAgICAgIG15X2FuZ2xlID0gTlVMTCwNCiAgICAgICAgICAgICAgICAgIG15X2xlZ2VuZCA9ICJyaWdodCIpDQoNCnAxMCA8LSBteWdlb21fYmFyKG15ZGF0YSA9IGRhdGFfcmVob3NwLCANCiAgICAgICAgICAgICAgICAgIG15ZXhwb3N1cmUgPSAiZXN0X2NpdmlsIiwgDQogICAgICAgICAgICAgICAgICBteW91dGNvbWUgPSAicmVob3NwX29tcyIsIA0KICAgICAgICAgICAgICAgICAgbXl0aXRsZSA9ICJFc3RhZG8gY2l2aWwiLCANCiAgICAgICAgICAgICAgICAgIG15bGFiZWxfeCA9ICIiLCANCiAgICAgICAgICAgICAgICAgIG15bGFiZWxfeSA9ICJGcmVjdWVuY2lhIiwgDQogICAgICAgICAgICAgICAgICBteV9maWxsID0gIlJlaG9zcGl0YWxpemFjacOzbiIsIA0KICAgICAgICAgICAgICAgICAgbXlfYW5nbGUgPSBOVUxMLA0KICAgICAgICAgICAgICAgICAgbXlfbGVnZW5kID0gInJpZ2h0IikNCg0KZ3JpZC5hcnJhbmdlKHA5LA0KICAgICAgICAgICAgICBwMTAsDQogICAgICAgICAgICAgIG5jb2wgPSAxLA0KICAgICAgICAgICAgICBucm93ID0gMikNCg0KYGBgDQoNCkNvbiBlbCBvYmpldGl2byBkZSBlbnJpcXVlY2VyIGVsIGFuw6FsaXNpcyBleHBsb3JhdG9yaW8sIHNlIGNhbGN1bGFyw6FuIGRvcyBtZWRpZGFzIG11eSBjb23Dum5lcyBkZSBsYSB0ZW9yw61hIGRlIGxhIGluZm9ybWFjacOzbiwgw6lzdGFzIHBlcm1pdGVuIGluZmVyaXIgYWxnbyBkZWwgcG9kZXIgcHJlZGljdGl2byBxdWUgcHVlZGVuIHRlbmVyIGxhcyB2YXJpYWJsZXMgaW5kZXBlbmRpZW50ZXMsIGFudGVzIGRlIGhhY2VyIHBhcnRlIGRlIHVuIG1vZGVsby4NCg0KW1ZvbHZlciBhbCDDjW5kaWNlXSgjaW5kaWNlKTwvZGl2Pg0KDQo8aHI+DQo8aDIgaWQ9IkFuYWxpc2lzV09FIiBzdHlsZT0idGV4dC1hbGlnbjogY2VudGVyOyIgbWFya2Rvd24gPSIxIj5BbsOhbGlzaXMgZGUgY2xhc2lmaWNhY2nDs24gYmluYXJpYSB1c2FuZG8gV09FIHkgZWwgSVY8L2gyPg0KPGRpdiBzdHlsZT0idGV4dC1hbGlnbjoganVzdGlmeSI+DQoNCkVsIHBlc28gZGUgbGEgZXZpZGVuY2lhIChXT0UpIHkgZWwgdmFsb3IgZGUgbGEgaW5mb3JtYWNpw7NuIChJVikgYXl1ZGFuLCBlbnRyZSBvdHJhcyBjb3NhcywgYSBkZXRlcm1pbmFyIGxhIGNvbnRyaWJ1Y2nDs24gaW5kZXBlbmRpZW50ZSBkZSBjYWRhIHZhcmlhYmxlIGFsIHJlc3VsdGFkbywgeSBkZXRlY3RhciByZWxhY2lvbmVzIGxpbmVhbGVzIHkgbm8gbGluZWFsZXMuIEVsIFdPRSBtaWRlIGxhIHJlbGFjacOzbiBlbnRyZSBsYSB2YXJpYWJsZSBwcmVkaWN0aXZhIHkgZWwgb2JqZXRvIGJpbmFyaW8sIG1pZW50cmFzIHF1ZSBlbCBJViBtaWRlIGxhIGZ1ZXJ6YSBwcmVkaWN0aXZhIGRlIGVzYSByZWxhY2nDs24uDQoNCkxhIHRhYmxhIGEgY29udGludWFjacOzbiBjb250aWVuZSBsb3MgdmFsb3JlcyBkZWwgInZhbG9yIGRlIGxhIGluZm9ybWFjacOzbiIgY29uIHkgc2luIGVsIGFqdXN0ZSBkZXJpdmFkbyBkZSBsYSB2YWxpZGFjacOzbiBjcnV6YWRhLiBDdWFuZG8gc2UgcmVhbGl6YSBlbCBhanVzdGUgY29uIGVsIG9iamV0aXZvIGRlIHF1ZSBsb3MgcmVzdWx0YWRvcyBzZWFuIG3DoXMgZXN0YWJsZXMsIHRhbnRvIHBhZ28gZGVsIGRpYWduw7NzdGljbywgZWwgaGVjaG8gZGUgcXVlIGVsIHBhY2llbnRlIGhhbGxhIHBhc2FkbyBwb3IgbGEgVW5pZGFkIGRlIGN1aWRhZG9zLCB5IHNpIGZ1ZXJvbiByZWFsaXphZG9zIHByb2NlZGltaWVudG9zIHF1aXLDunJnaWNvcyBzZXLDoW4gbGFzIMO6bmljYXMgdmFyaWFibGVzIGNvbiBzdWZpY2llbnRlIGNhcGFjaWRhZCBkZSBwcmVkaWNjacOzbiBhIG5pdmVsIGluZGl2aWR1YWwgeSB1bml2YXJpYWJsZSAoSXYgPiAwLjA1KS4gQ3VhbmRvIHNlIHJlbGFqYSBlbCBzdXB1ZXN0bywgSVYgc2luIHJlc3RhciBlbCBwZW5hbHR5LCBzZSBpbmNsdWlyw61hbiBsb3MgZMOtYXMgZW4gcXVlIGVzdHV2byBob3NwaXRhbGl6YWRvLg0KDQpgYGB7ciwgbWVzc2FnZSA9IEZBTFNFLCB3YXJuaW5nID0gRkFMU0UsIGVjaG8gPSBGQUxTRSwgZXZhbCA9VFJVRX0NCnNldC5zZWVkKDEyMzQpDQpkYXRhX3JlaG9zcCA8LSBkYXRhX3JlaG9zcCAlPiUNCiAgbXV0YXRlKGlkID0gMTpucm93KC4pKSANCg0KZGF0YV9yZWhvc3AgJT4lDQogIHNhbXBsZV9mcmFjKHNpemUgPSAuNzApIC0+IHRyYWluDQoNCmRhdGFfcmVob3NwICU+JQ0KICBhbnRpX2pvaW4oeCA9IC4sDQogICAgICAgICAgICB5ID0gdHJhaW4sIA0KICAgICAgICAgICAgYnkgPSAiaWQiKSAtPiB0ZXN0DQogIA0KdHJhaW4gPC0gc2VsZWN0KC5kYXRhID0gdHJhaW4sIC1pZCkNCnRlc3QgPC0gc2VsZWN0KC5kYXRhID0gdGVzdCwgLWlkKQ0KDQpJViA8LSBjcmVhdGVfaW5mb3RhYmxlcyhkYXRhID0gdHJhaW4sDQogICAgICAgICAgICAgICAgICAgdmFsaWQgPSB0ZXN0LA0KICAgICAgICAgICAgICAgICAgIHkgPSAicmVob3NwX29tcyIpDQoNCmthYmxlX3N0eWxpbmcoa2FibGUoSVYkU3VtbWFyeSksIA0KICAgICAgICAgICAgICBwb3NpdGlvbiA9ICJjZW50ZXIiLCANCiAgICAgICAgICAgICAgcm93X2xhYmVsX3Bvc2l0aW9uID0gMSwNCiAgICAgICAgICAgICAgZnVsbF93aWR0aCA9IEYpDQpgYGANCg0KRGUgYWN1ZXJkbyBhbCBwb2RlciBwcmVkaWN0aXZvIGRlIGNhZGEgdW5hIGRlIGxhcyB2YXJpYWJsZXMsIHNlIGVsaWdlbiBhcXVlbGxhcyBjdXlvIFZhbG9yIGRlIGxhIGluZm9ybWFjacOTbiAoSVYpIHNlYSBzdXBlcmlvciBhbCAyJSAoMCwwMikuIExhcyB2YXJpYWJsZXMgY29uIElWIGluZmVyaW9yZXMgYSBlc3RlIHZhbG9yIHNlIGNvbnNpZGVyYW4gaW1wcmVkaWN0aXZhcyB5IHNlIGRlY2lkZSBkZXNjYXJ0YXJsYXMuIExhcyB2YXJpYWJsZXMgcXVlIGNvbnRpbnVhbiwgZW4gb3JkZW4gZGUgcmVsZXZhbmNpYSBzZWd1biBzdSBwb2RlciBwcmVkaWN0b3IsIHNvbjoNCg0KPHVsPg0KPGxpPnBhZ29faG9zcDwvbGk+DQo8bGk+cXVpcnVyPC9saT4NCjxsaT5kaWFzX3VjZTwvbGk+DQo8bGk+ZGlhc191Y2k8L2xpPg0KPGxpPnByb3ZlZWRvcjwvbGk+DQo8bGk+ZGlhc19ob3NwPC9saT4NCjxsaT5lZGFkPC9saT4NCjxsaT5nZW5lcm88L2xpPg0KPGxpPmNpdWRhZDwvbGk+DQo8L3VsPg0KDQoNClNpbiBlbWJhcmdvLCB0YW50byBsYSBjaXVkYWQsIGNvbW8gZWwgcHJvdmVlZG9yIG5vIHNlcsOhbiB0ZW5pZG9zIGVuIGN1ZW50YSwgcG9yIHF1ZSBwdWVkZW4gbGxlZ2FyIGEgY29uZGljaW9uYXIgbnVlc3RyYSB2YXJpYWJsZSBvYmpldGl2by4gQWRpY29uYWxtZW50ZSwgbG8gZMOtYXMgVUNFIHkgVUNJIHBhcmVjZW4gZXN0YXIgYWx0YW1lbnRlIGNvcnJlbGFjaW9uYWRvcyBjb24gbGEgdmFyaWFibGUgb2JqZXRpdm8uIHBvciBsbyBxdWUgdGFtcG9jbyBzZXLDoW4gdGVuaWRvcyBlbiBjdWVudGEuDQoNCkVuZm9jYW5kb25vcyBlbiBlbCBwYWdvIGRlbCBkaWFnbsOzc3RpY28sIGVsIGN1YWwsIGVzIHVuYSBkZSBsYXMgdmFyaWFibGVzIGNvbiBtYXlvciBpbmZsdWVuY2lhLCBlbCBXT0Ugbm9zIGluZGljYSB1bmEgcmVsYWNpw7NuIG5vIGxpbmVhbCwgY29uIHVuIGluY3JlbWVudG8gZW4gZWwgV09FIGEgbWVkaWRhIHF1ZSBkaXNtaW51eWUgZWwgcmFuZ28gZGUgcGFnbyBlbiBlbCBkaWFnbsOzc3RpY28uDQoNCmBgYHtyLCBtZXNzYWdlID0gRkFMU0UsIHdhcm5pbmcgPSBGQUxTRSwgZWNobyA9IEZBTFNFLCBldmFsID1UUlVFfQ0Ka2FibGVfc3R5bGluZyhrYWJsZShJViRUYWJsZXMkZWRhZCksIA0KICAgICAgICAgICAgICBwb3NpdGlvbiA9ICJjZW50ZXIiLCANCiAgICAgICAgICAgICAgcm93X2xhYmVsX3Bvc2l0aW9uID0gMSwNCiAgICAgICAgICAgICAgZnVsbF93aWR0aCA9IEYpDQpgYGANCg0KYGBge3IsIG1lc3NhZ2UgPSBGQUxTRSwgd2FybmluZyA9IEZBTFNFLCBlY2hvID0gRkFMU0UsIGV2YWwgPVRSVUV9DQpuIDwtIG5hbWVzKElWJFRhYmxlcykNCmZvciAoaSBpbiAxOmxlbmd0aChuKSl7DQogICBwbG90X2luZm90YWJsZXMoSVYsIG5baV0pfQ0KDQpNdWx0aVBsb3QoSVYsIElWJFN1bW1hcnkkVmFyaWFibGVbYygxLDIsMyw0LDYsMTApXSkNCmBgYA0KDQpDb21vIHNlIHB1ZG8gb2JzZXJ2YXIgZW4gZWwgYW5hbGlzaXMgZGVsIFdPRSwgZXN0YSB0w6ljbmljYSBhanVzdGEgbG9zIHZhbG9yZXMgZGUgbGFzIHZhcmlhYmxlcyBudW1lcmljYXMgZW4gcmFuZ29zIGFjb3RhZG9zIGRlIGFjdWVyZG8gYWwgdmFsb3IgZGUgbGEgaW5mb3JtYWNpb24gZGUgY2FkYSB1bmEgZGUgZWxsYXMgZW4gcmVsYWNpb24gY29uIGxhIHZhcmlhYmxlIGRlcGVuZGllbnRlLiBQb3IgZXN0bywgZXMgaW1wb3J0YW50ZSB0cmFuc2Zvcm1hciBkaWNoYXMgdmFyaWFibGVzIGVuIGxvcyByYW5nb3MgcmVjb21lbmRhZG9zLg0KDQpgYGB7ciwgbWVzc2FnZSA9IEZBTFNFLCB3YXJuaW5nID0gRkFMU0UsIGVjaG8gPSBGQUxTRSwgZXZhbCA9VFJVRX0NCiMgZGF0YV9yZWhvc3AgJT4lDQojICAgbXV0YXRlKHBhZ29faG9zcDEgPSBjYXNlX3doZW4oIHBhZ29faG9zcCA8PSAxMDc0MTAgfiAiWzAsMTA3NDEwXSIsDQojICAgICAgICAgICAgICAgICAgICAgICAgICAgIHBhZ29faG9zcCA+PSAxMDc1NzAgJiBwYWdvX2hvc3AgPD0gNzc2OTY1IH4gIlsxMDc1NzAsNzc2OTY1XSIsDQojICAgICAgICAgICAgICAgICAgICAgICAgICAgIHBhZ29faG9zcCA+PSA3Nzc2OTcgJiBwYWdvX2hvc3AgPD0gMTU0NzgwNiB+ICJbNzc3Njk3LDE1NDc4MDZdIiwNCiMgICAgICAgICAgICAgICAgICAgICAgICAgICAgcGFnb19ob3NwID49IDE1NDc4NDcgJiBwYWdvX2hvc3AgPD0gMjI1MTc2NCB+ICJbMTU0Nzg0NywyMjUxNzY0XSIsDQojICAgICAgICAgICAgICAgICAgICAgICAgICAgIHBhZ29faG9zcCA+PSAyMjUxOTEzICYgcGFnb19ob3NwIDw9IDMwMjE4NjIgfiAiWzIyNTE5MTMsMzAyMTg2Ml0iLA0KIyAgICAgICAgICAgICAgICAgICAgICAgICAgICBwYWdvX2hvc3AgPj0gMzAyMjAzMCAmIHBhZ29faG9zcCA8PSAzOTk2OTI4IH4gIlszMDIyMDMwLDM5OTY5MjhdIiwNCiMgICAgICAgICAgICAgICAgICAgICAgICAgICAgcGFnb19ob3NwID49IDM5OTY5MzMgJiBwYWdvX2hvc3AgPD0gNTMyODQyMyB+ICJbMzk5NjkzMyw1MzI4NDIzXSIsDQojICAgICAgICAgICAgICAgICAgICAgICAgICAgIHBhZ29faG9zcCA+PSA1MzI5NTAwICYgcGFnb19ob3NwIDw9IDcwNDgyOTAgfiAiWzUzMjk1MDAsNzA0ODI5MF0iLA0KIyAgICAgICAgICAgICAgICAgICAgICAgICAgICBwYWdvX2hvc3AgPj0gNzA0ODkwMiAmIHBhZ29faG9zcCA8PSAxMTQwODQxNSB+ICJbNzA0ODkwMiwxMTQwODQxNV0iLA0KIyAgICAgICAgICAgICAgICAgICAgICAgICAgICBwYWdvX2hvc3AgPj0gMTE0MDg2MjUgJiBwYWdvX2hvc3AgPD0gNDczODc4ODMgfiAiWzExNDA4NjI1LDQ3Mzg3ODgzXSIsDQojICAgICAgICAgICAgICAgICAgICAgICAgICAgIHBhZ29faG9zcCA+PSA0NzM4Nzg4MyB+ICJbNDczODc4ODMrIiksDQojICAgICAgICAgIGRpYXNfaG9zcDEgPSBjYXNlX3doZW4oIGRpYXNfaG9zcCA9IDEgfiAiWzFdIiwNCiMgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkaWFzX2hvc3AgPSAyIH4gIlsyXSIsDQojICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZGlhc19ob3NwID0gMyB+ICJbM10iLA0KIyAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGRpYXNfaG9zcCA9IDQgfiAiWzRdIiwNCiMgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkaWFzX2hvc3AgPj0gNSAmIGRpYXNfaG9zcCA8PSA3IH4gIls1LDddIiwNCiMgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkaWFzX2hvc3AgPj0gOCAmIGRpYXNfaG9zcCA8PSAzMCB+ICJbOCwzMF0iKSkgLT4gZGF0YV9yZWhvc3AyDQojIA0KIyANCiMgc3RyKGRhdGFfcmVob3NwKQ0KDQpgYGANCg0KDQpbVm9sdmVyIGFsIMONbmRpY2VdKCNpbmRpY2UpPC9kaXY+DQoNCjxocj4NCjxoMiBpZD0iTW9kZWxvIiBzdHlsZT0idGV4dC1hbGlnbjogY2VudGVyOyIgbWFya2Rvd249IjEiPk1vZGVsbzwvYT48L2gyPg0KPGRpdiBzdHlsZSA9ICJ0ZXh0LWFsaWduOiBqdXN0aWZ5Ij4NCg0KRWwgb2JqZXRpdm8gcHJpbmNpcGFsIGRlbCBhbsOhbGlzaXMgZXMgZXN0aW1hciB1biBtb2RlbG8gcHJlZGljdGl2byBjb24gZWwgY3XDoWwgc2UgcHVlZGEgZXN0aW1hciBsYSBwcm9iYWJpbGlkYWQgZGUgcXVlIHVuIHBhY2llbnRlIHRlcm1pbmUgZW4gdW5hIHJlaG9zcGl0YWxpemFjacOzbiwgYXNvY2lhZGEgYSB1biBkaWFuZ8Ozc3RpY28gYW50ZXJpb3IuIFBhcmEgZWxsbyBzZSBlbXBsZWFyw6EgdW4gbW9kZWxvIGRlIHJlZ3Jlc2nDs24gbG9nw61zdGljYSwgZWwgY3XDoWwgZXMgYW1wbGlhbWVudGUgdXRpbGl6YWRvIHBhcmEgcmVzb2x2ZXIgcHJvYmxlbWFzIGRlIGNsYXNpZmljYWNpw7NuIGJpbmFyaWEuDQoNClVuYSB2ZXogc2UgcmVhbGl6YW4gbG9zIGZpbHRyb3MgZGUgY2FsaWRhZCB5IGNvbXBsZXRpdHVkLCB5IHRyYXMgbG8gb2J0ZW5pZG8gZW4gbG9zIHJlc3VsdGFkb3MgZGVsIFdPRSwgc2UgcHJvY2VkZSBhIHJlYWxpemFyIGxhIHNlbGVjY2lvbiBkZSB2YXJpYWJsZXMgcGFyYSBlbCBtb2RlbG8uIFNlIHRlbmRyw6FuIGVuIGN1ZW50YSBlbnRvbmNlcywgZWwgcGFnbyByZWFsaXphZG8sIGxvcyBkw61hcyBlbiBxdWUgZXN0dXZvIGVsIHBhY2llbnRlIGRlIGZvcm1hIGdlbmVyYWwsIGVsIGhlY2hvIGRlIHF1ZSBzZSBsZSBoYXlhIHJlYWxpemFkbyBvIG5vIHVuYSBjaXJ1Z8OtYSwgZWwgZ8OpbmVybywgbGEgZWRhZCB5IGVsIGVzdHJhdG8uDQoNClBhcmEgZXZhbHVhciBsYSBjYXBhY2lkYWQgZGUgZ2VuZXJhbGl6YWNpw7NuIGRlbCBtb2RlbG8sIHNlIGRpdmlkaXLDoSBlbCBjb25qdW50byBkZSBkYXRvcyBlbiBlbnRyZW5hbWllbnRvICg3MCUpIHkgcHJ1ZWJhICgzMCUpLg0KDQpgYGB7ciwgbWVzc2FnZSA9IEZBTFNFLCB3YXJuaW5nID0gRkFMU0UsIGVjaG8gPSBGQUxTRSwgZXZhbCA9VFJVRX0NCnNldC5zZWVkKDEyMzQpDQpkYXRhX3JlaG9zcCAlPiUNCiAgc2VsZWN0KGlkLA0KICAgICAgICBwYWdvX2hvc3AsDQogICAgICAgIHF1aXJ1ciwNCiAgICAgICAgZGlhc19ob3NwLA0KICAgICAgICBnZW5lcm8sDQogICAgICAgIGVkYWQsDQogICAgICAgIGVzdHJhdG8sDQogICAgICAgIHJlaG9zcF9vbXMpIC0+IG1vZGVsX3JlaG9zcA0KDQptb2RlbF9yZWhvc3AgJT4lDQogIHNhbXBsZV9mcmFjKHNpemUgPSAwLjcpIC0+IHRyYWluaW5nDQoNCm1vZGVsX3JlaG9zcCAlPiUNCiAgYW50aV9qb2luKHggPSAuLA0KICAgICAgICAgICAgeSA9IHRyYWluaW5nLA0KICAgICAgICAgICAgYnkgPSAiaWQiKSAtPiB0ZXN0aW5nDQoNCnRlc3RpbmcgJT4lDQogIHNlbGVjdCgtaWQpIC0+IHRlc3RpbmcNCg0KdHJhaW5pbmcgJT4lDQogIHNlbGVjdCgtaWQpICU+JQ0KICBtdXRhdGUocmVob3NwX29tcyA9IGFzLmZhY3RvcihyZWhvc3Bfb21zKSkgLT4gdHJhaW5pbmcNCg0KYGBgDQoNCltWb2x2ZXIgYWwgw41uZGljZV0oI2luZGljZSk8L2Rpdj4NCg0KPGhyPg0KPGgzIGlkPSJTTU9URSIgc3R5bGU9InRleHQtYWxpZ246IGNlbnRlcjsiIG1hcmtkb3duPSIxIj5TbW90ZTwvaDM+DQo8ZGl2IHN0eWxlPSJ0ZXh0LWFsaWduOiBqdXN0aWZ5Ij4NCg0KQ29tbyBzZSBoYWJpYSBtZW5jaW9uYWRvIGFudGVyaW9ybWVudGUsIGxhIGluZm9ybWFjaW9uIHNlIGVuY3VlbnRyYSBkZXNiYWxhbmNlYWRhOyBlc3RvIGVzLCB0ZW5pZW5kbyBlbiBjdWVudGEgcXVlIGVsIHByb2JsZW1hIGVuIHF1ZSBzZSBlc3RhIHRyYWJhamFuZG8gY29uc2lzdGUgZW4gbGEgY2xhc2lmaWNhY2lvbiBkZSB1bmEgdmFyaWFibGUgZGljb3TDs21pY2EsIHNlIGRlYmUgYW5hbGl6YXIgZWwgbml2ZWwgZGUgcmVwcmVzZW50YWNpb24gZGUgc3VzIHBvc2libGVzIHZhbG9yZXMgZGVudHJvIGRlbCBjb25qdW50byB0b3RhbCBkZSBkYXRvcy4NCg0KYGBge3IsIG1lc3NhZ2UgPSBGQUxTRSwgd2FybmluZyA9IEZBTFNFLCBlY2hvID0gRkFMU0UsIGV2YWwgPVRSVUV9DQoNCmthYmxlKGFzLmRhdGEuZnJhbWUocHJvcC50YWJsZSh0YWJsZShtb2RlbF9yZWhvc3AkcmVob3NwX29tcykpKSkgJT4lDQprYWJsZV9zdHlsaW5nKHBvc2l0aW9uID0gImNlbnRlciIsIA0KICAgICAgICAgICAgICByb3dfbGFiZWxfcG9zaXRpb24gPSAxLA0KICAgICAgICAgICAgICBmdWxsX3dpZHRoID0gRikgJT4lDQpyb3dfc3BlYygwLGJhY2tncm91bmQ9IiNFQkYwRjciKQ0KDQoNCmBgYA0KDQpWZW1vcyBxdWUgbGEgcmVwcmVzZW50YWNpb24gcGFyYSBsYSBjYXRlZ29yw61hIHBvc2l0aXZhIGVzIHVuIHBvY28gbWFzIGRlbCAyJSBkZSBsYSBpbmZvcm1hY2nDs24uIEVuIGVzdGUgY2FzbyB2YW1vcyBhIHJlYWxpemFyIHVuIHRyYXRhbWllbnRvIHF1ZSBwZXJtaXRhIGF1bWVudGFyIGxhIGNsYXNlIG1pbm9yaXRhcmlhLCBzaW4gdXRpbGl6YXIgc29sdWNpb25lcyBnZW7DqXJpY2FzIGNvbW8gcmVkdWNpciBsYSBjbGFzZSBtYXlvcml0YXJpYSBhbCBuaXZlbCBkZSBsYSBjbGFzZSBtZW5vci4NCg0KUGFyYSBlbGxvLCB2YW1vcyBhIHV0aWxpemFyIGxhIHTDqWNuaWNhIFNNT1RFIChTeW50aGV0aWMgTWlub3JpdHkgT3ZlcnNhbXBsaW5nIE1ldGhvZCksIGxhIGN1YWwgZ2VuZXJhIG51ZXZhcyBpbnN0YW5jaWFzIGFydGlmaWNpYWxlcyBkZSBsYSBjbGFzZSBtw6FzIHBlcXVlw7FhIGludGVycG9sYW5kbyBsb3MgdmFsb3JlcyBkZSBsYXMgaW5zdGFuY2lhcyBtaW5vcml0YXJpYXMgbcOhcyBjZXJjYW5hcyBhIHVuYSBkYWRhLg0KDQpQb3IgbWVkaW8gZGUgU01PVEUgc2UgZ2VuZXJhcsOhIHVuIG51ZXZvIHNldCBkZSBkYXRvcyBkZSBlbnRyZW5hbWllbnRvLCBlbiBlbCBjdWFsIHNlIHRlbmdhIHVuIDYwJSBkZSBpbmZvcm1hY2lvbiBwYXJhIGxhIGNhdGVnb3JpYSBuZWdhdGl2YSAocmVob3NwX29tcyA9IDApIHkgNDAlIHBhcmEgbGEgY2F0ZWdvcmlhIHBvc2l0aXZhIChyZWhvc3Bfb21zID0gMCkuDQoNCmBgYHtyLCBtZXNzYWdlID0gRkFMU0UsIHdhcm5pbmcgPSBGQUxTRSwgZWNobyA9IEZBTFNFLCBldmFsID1UUlVFfQ0KdHJhaW5pbmcgPC0gU01PVEUocmVob3NwX29tcyB+IC4sIGFzLmRhdGEuZnJhbWUodHJhaW5pbmcpLCBwZXJjLm92ZXIgPSAzNTAsIHBlcmMudW5kZXIgPSAxNTApDQojdHJhaW5pbmcgPC0gU01PVEUocmVob3NwX29tcyB+IC4sIGFzLmRhdGEuZnJhbWUodHJhaW5pbmcpLCBwZXJjLm92ZXIgPSAzMDAsIHBlcmMudW5kZXIgPSAyMDApDQpgYGANCg0KVmVyaWZpY2Ftb3MgcXVlIGVsIHNldCBkZSBlbnRyZW5hbWllbnRvIHNlIGVuY3VlbnRyZSBiYWxhbmNlYWRvOg0KDQpgYGB7ciwgbWVzc2FnZSA9IEZBTFNFLCB3YXJuaW5nID0gRkFMU0UsIGVjaG8gPSBGQUxTRSwgZXZhbCA9VFJVRX0NCg0Ka2FibGVfc3R5bGluZyhrYWJsZShhcy5kYXRhLmZyYW1lKHByb3AudGFibGUodGFibGUodHJhaW5pbmckcmVob3NwX29tcykpKSksIA0KICAgICAgICAgICAgICBwb3NpdGlvbiA9ICJjZW50ZXIiLCANCiAgICAgICAgICAgICAgcm93X2xhYmVsX3Bvc2l0aW9uID0gMSwNCiAgICAgICAgICAgICAgZnVsbF93aWR0aCA9IEYpICU+JQ0Kcm93X3NwZWMoMCxiYWNrZ3JvdW5kPSIjRUJGMEY3IikNCg0KYGBgDQoNCltWb2x2ZXIgYWwgw41uZGljZV0oI2luZGljZSk8L2Rpdj4NCg0KPGhyPg0KPGgzIGlkPSJBanVzdGVtb2QiIHN0eWxlPSJ0ZXh0LWFsaWduOiBjZW50ZXI7IiBtYXJrZG93bj0iMSI+QWp1c3RlIGRlbCBtb2RlbG8geSBFc3RpbWFjacOzbiBkZSBwYXLDoW1ldHJvczwvaDM+DQo8ZGl2IHN0eWxlPSJ0ZXh0LWFsaWduOiBqdXN0aWZ5Ij4NCg0KRGVsIHJlc3VsdGFkbyBleHBsb3JhdG9yaW8gYW50ZXJpb3IsIGFsIGRpc2NyaW1pbmFyIGVsIGFuw6FsaXNpcyBkZSBsYXMgdmFyaWFibGVzIGluZGVwZW5kaWVudGVzIHBvciBudWVzdHJhIHZhcmlhYmxlIG9iamV0aXZvIChSZWhvc3BpdGFsaXphY2nDs24pLCBlcyBwb3NpYmxlIGV2aWRlbmNpYXIgdW5hIGRpZmVyZW5jaWEgY2xhcmEgZW50cmUgbGFzIGRpc3RyaWJ1Y2lvbmVzIHBhcmEgbG9zIGF0cmlidXRvczogUGFnby9jb3N0byBkZWwgcHJvY2VkaW1pZW50byB5IGxvcyBkw61hcyBlbiBxdWUgZWwgdXN1YXJpbyBlc3R1dm8gaW50ZXJuYWRvIHlhIHNlYSBlbiBsYSBVbmlkYWQgZGUgQ3VpZGFkb3MgSW50ZW5zaXZvcyBvIEVzcGVjaWFsZXMuIEVzdG8gcG9kcsOtYSBzZXIgdW4gaW5kaWNpbyBkZSBxdWUgZXN0YXMgdmFyaWFibGVzIGVuIHBhcnRpY3VsYXIsIHB1ZWRlbiBsbGVnYXIgYSBzZXIgcmVsZXZhbnRlcyBwYXJhIGV4cGxpY2FyIGxhIHByb2JhYmlsaWRhZCBkZSBvY3VycmVuY2lhIGRlbCBldmVudG8sIGVzIGRlY2lyLCBjdWFuZG8gaHVibyB1bmEgaG9zcGl0YWxpemFjacOzbiBwb3N0ZXJpb3IgbGlnYWRhIGEgdW4gZGlhZ27Ds3N0aWNvLg0KDQpBIGNvbnRpbnVhY2nDs24sIGFsIGFqdXN0YXIgZWwgbW9kZWxvIG9idGVuZW1vcyBsb3Mgc2lndWllbnRlcyByZXN1bHRhZG9zOg0KDQpgYGB7ciwgbWVzc2FnZSA9IEZBTFNFLCBlY2hvID0gRkFMU0UsIGV2YWwgPVRSVUV9DQpteWxvZ2l0IDwtIGdsbShyZWhvc3Bfb21zIH4gcGFnb19ob3NwICsgcXVpcnVyICsgIGRpYXNfaG9zcCArIGVkYWQgKyBnZW5lcm8gKyBlc3RyYXRvLCBkYXRhID0gdHJhaW5pbmcsIGZhbWlseSA9ICJiaW5vbWlhbCIpDQpzdW1tYXJ5KG15bG9naXQpDQpgYGANCg0KMS4gQ2FkYSBjYW1iaW8gZW4gdW5hIHVuaWRhZCBlbiBlbCBwYWdvIGhvc3BpdGFsYXJpbyBkaXNtaW51aXLDoSBsYXMgcHJvYmFiaWxpZGFkZXMgZGUgcmVob3NwaXRhbGl6YWNpw7NuLCBwZXJvIGVuIHVuYSBjYW50aWRhZCBtdXkgcGVxdWXDsWEgKC02Ljk1M0UtMDgpDQoyLiBDdWFuZG8gYSB1biBwYWNpZW50ZSBzZSBsZSByZWFsaXphIHVuIHByb2NlZGltaWVudG8gcXVpcsO6cmdpY28gc3UgcHJvYmFiaWxpZGFkIGRlIHF1ZSB0ZXJtaW5lIGhvc3BpdGFsaXphZG8gZGUgbnVldm8gcG9yIGVsIG1pc21vIGRpYWduw7NzdGljbywgZGlzbWludXllIGVuIG3DoXMgZGVsIDE5JSBlbiBjb21wYXJhY2nDs24gYSBjdWFuZG8gbm8gc2UgbGUgcmVhbGl6YSBuaW5ndW5hIGNpcnVnw61hLg0KMy4gTGEgcHJvYmFiaWxpZGFkIGRlIHJlaG9zcGl0YWxpemFjacOzbiBkZWNyZWNlLCBhbCBwZXJtYW5lY2VyIHVuIGTDrWEgYWRpY2lvbmFsIGVsIHBhY2llbnRlIGVuIGxhIFVDRSAoZW4gMS40NSkgeSBsYSBVQ0kgKDEuNzMpDQoNCkVsIHJlc3RvIGRlIGxhcyB2YXJpYWJsZXMgbm8gc29uIHN1ZmljaWVudGVtZW50ZSBleHBsaWNhdGl2YXMgcGFyYSBwcmVkZWNpciwgZGUgbWFuZXJhIHNpZ25pZmljYXRpdmEsIHN1IGVmZWN0byBzb2JyZSBsYSB2YXJpYWJsZSBkZSByZXNwdWVzdGEgYmluYXJpYS4NCg0KRGVzcHXDqXMgZGUgZXN0aW1hZG9zIGxvcyBjb2VmaWNlbnRlcyBzZSBwcm9jZWRlIGEgcmVhbGl6YXIgbGEgcHJlZGljY2nDs24gZGVudHJvIHkgZnVlcmEgZGUgbXVlc3RyYSBwYXJhIGV2YWx1YXIgbGEgcHJlY2lzacOzbiAoYWNjdXJhY3kpIHkgY2FwYWNpZGFkIGRlIGdlbmVyYWxpemFjacOzbiBkZSBudWVzdHJvIG1vZGVsby4gDQoNCmBgYHtyLCBtZXNzYWdlID0gRkFMU0UsIGVjaG8gPSBGQUxTRSwgZXZhbCA9VFJVRX0NCnByZWRfdHJhaW4gPC0gcHJlZGljdChteWxvZ2l0LCBuZXdkYXRhID0gdHJhaW5pbmdbLTddLCB0eXBlID0gInJlc3BvbnNlIikNCnlfcHJlZF90cmFpbiA8LSBpZmVsc2UocHJlZF90cmFpbiA+IDAuNSwgMSwgMCkNCnlfYWN0X3RyYWluIDwtIHRyYWluaW5nJHJlaG9zcF9vbXMNCg0KcHJlZCA9IHByZWRpY3QobXlsb2dpdCwgdHlwZSA9ICdyZXNwb25zZScsIG5ld2RhdGEgPSB0ZXN0aW5nWy03XSkNCnlfcHJlZCA9IGlmZWxzZShwcmVkID4gMC41LCAxLCAwKQ0KeV9hY3QgPC0gdGVzdGluZyRyZWhvc3Bfb21zDQoNCg0Ka2FibGUoZGF0YS5mcmFtZShUcmFpbiA9IG1lYW4oeV9wcmVkX3RyYWluID09IHlfYWN0X3RyYWluKSwgVGVzdCA9IG1lYW4oeV9wcmVkID09IHlfYWN0KSkpICU+JQ0KICBrYWJsZV9zdHlsaW5nKHBvc2l0aW9uID0gImNlbnRlciIsIA0KICAgICAgICAgICAgICAgIHJvd19sYWJlbF9wb3NpdGlvbiA9IDEsDQogICAgICAgICAgICAgICAgZnVsbF93aWR0aCA9IEYpICU+JQ0Kcm93X3NwZWMoMCxiYWNrZ3JvdW5kPSIjRUJGMEY3IikNCiAgDQpgYGANCg0KTG9zIHJlc3VsdGFkb3MgaW5kaWNhbiB1biBuaXZlbCBkZSBhY2N1cmFjeSBzb3NwZWNob3NhbWVudGUgZWxldmFkbywgaW5sdXNvIGVsIG1vZGVsbyBwYXJlY2UgYWp1c3RhcnNlIG1lam9yIGNvbiBsb3MgZGF0b3MgbnVldm9zLCBxdWUgZW4gbGEgcGFydGUgZGUgZW50cmVuYW1pZW50by4gUGFyYSB2ZXIgZW4gZGV0YWxsZSBjb21vIHNlIGNvbXBvcnRhLCBhbCBkaXNjcmltaW5hciBlbnRyZSBsb3MgY2Fzb3MgZW4gcXVlIGVsIHBhY2llbnRlIHNhbGUgZGVmaW5pdGl2YW1lbnRlIG8gdGVybWluYSBlbiB1bmEgcmVob3NwaXRhbGl6YWNpw7NuLCB5IGV2aWRlbmNpYXIgc3UgZGVzZW1wZcOxbyBwb3Igc2VwYXJhZG8sIHNlIGVzdGltYXLDoSBsYSBtYXRyaXogZGUgY29uZnVzacOzbjoNCg0KYGBge3J9DQp0YWJsZShhcy5tYXRyaXgodGVzdGluZ1ssIDddKSwgeV9wcmVkID4gMC41KQ0KYGBgDQoNCkxvcyByZXN1bHRhZG9zIG5vIHBhcmVjZW4gaW5kaWNhciBxdWUgw6lzdGUgY29tcG9ydGFtaWVudG8gc2UgZGVuIGEgY2F1c2EgZGVsIGRlc2JhbGFuY2VvLiBQb3IgdW4gbGFkbyB0ZW5lbW9zIHF1ZSBsYSBzZW5zaWJpbGlkYWQgeSBsYSBlc3BlY2lmaWNpZGFkIGNvcnJlc3BvbmRlbiBhbCA5NiUgeSA5OSUuIFNpIHNlIGhhYmxhIGVuIHTDqXJtaW5vcyBkZSBwcmVjaXNpw7NuLCBzZXLDrWEgZGUgZGUgdW4gOTklIGN1YW5kbyBlcyAwLCBlcyBkZWNpciBkZSB1biB0b3RhbCBkZSAxMDIxOCBwYWNpZW50ZXMgcXVlIG5vIHRlcm1pbmFyb24gZW4gaG9zcGl0YWxpemFjacOzbiBwdWRlIHByZWRlY2lyIGNvbiB1bmEgZXhhY3RpdHVkIHF1ZSBlbCA5OSUgbm8gbG8gaGFyw61hbiwgbWllbnRyYXMgcXVlIGRlIDI0OSBwYWNpZW50ZXMgcXVlIHNpIHR1dmllcm9uIHVuYSByZWhvc3BpdGFsaXphY2nDs24gcHVkZSBwcmVkZWNpciBxdWUgMjEwIGVmZWN0aXZhbWVudGUgbG8gaGFyw61hbiwgZXMgZGVjaXIsIG1pIHByZWNpc2nDs24gZnVlIGRlbCA4NCUuIA0KDQpTaW4gZW1iYXJnbywgbm8gc8OzbG8gcG9yIGxvcyByZXN1bHRhZG9zIG9idGVuaWRvcyBjb24gZWwgYWp1c3RlIGRlbCBtb2RlbG8sIHNpbm8gdGFtYmnDqW4gY29uIGxvIHF1ZSB2ZcOtYW1vcyBhbnRlcmlvcm1lbnRlIGVuIGxhIHRhYmxhIGRlbCB2YWxvciBkZSBsYSBpbmZvcm1hY2nDs24sIGxhcyB2YXJpYWJsZXMgZMOtYXMgVUNJIHkgZMOtYXMgVUNFIHBhcmVjZW4gZXhwbGljYXIgZGUgbWFuZXJhIGNhc2kgcGVyZmVjdGEgbGEgcHJvYmFiaWxpZGFkIGRlIHF1ZSBvY3VycmUgdW4gZXZlbnRvIHJlaG9zcGl0YWxhcmlvIHkgZXN0byBwdWVkZSBkZWJlcnNlIC4uLi4uLi4uIHBvciBlbmRlIHNlIGRlY2lkZSBlc3RpbWFyIGVsIG1vZGVsbyBzaW4gaW5jbHVpcmxhcy4NCg0KQSBjb250aW51YWNpw7NuLCBzZSBvYnRpZW5lbiBsb3MgcmVzdWx0YWRvczoNCg0KYGBge3J9DQpteWxvZ2l0XzIgPC0gZ2xtKHJlaG9zcF9vbXMgfiBwYWdvX2hvc3AgKyBxdWlydXIgKyBkaWFzX2hvc3AgKyBlc3RyYXRvLCBkYXRhID0gdHJhaW5pbmcsIGZhbWlseSA9ICJiaW5vbWlhbCIpDQpzdW1tYXJ5KG15bG9naXQpDQpgYGANCiANCmBgYHtyfQ0KcHJlZF90cmFpbiA8LSBwcmVkaWN0KG15bG9naXRfMiwgbmV3ZGF0YSA9IHRyYWluaW5nWy03XSwgdHlwZSA9ICJyZXNwb25zZSIpDQp5X3ByZWRfdHJhaW4gPC0gaWZlbHNlKHByZWRfdHJhaW4gPiAwLjUsIDEsIDApDQp5X2FjdF90cmFpbiA8LSB0cmFpbmluZyRyZWhvc3Bfb21zDQoNCnByZWQgPSBwcmVkaWN0KG15bG9naXRfMiwgdHlwZSA9ICdyZXNwb25zZScsIG5ld2RhdGEgPSB0ZXN0aW5nWy03XSkNCnlfcHJlZCA9IGlmZWxzZShwcmVkID4gMC41LCAxLCAwKQ0KeV9hY3QgPC0gdGVzdGluZyRyZWhvc3Bfb21zDQoNCmBgYHtyfQ0KdGFwcGx5KHByZWRfdHJhaW4sIHRyYWluaW5nWyw3XSwgRlVOID0gbWVkaWFuKQ0KYGBgDQoNCg0KYGBge3IsIG1lc3NhZ2UgPSBGQUxTRSwgZWNobyA9IEZBTFNFLCBldmFsID1UUlVFfQ0KbGlicmFyeShST0NSKQ0KUk9DUnByZWQgPSBwcmVkaWN0aW9uKHByZWQsIHRlc3RpbmckcmVob3NwX29tcykNCiANCiMgUGVyZm9ybWFuY2UgZnVuY3Rpb24NClJPQ1JwZXJmID0gcGVyZm9ybWFuY2UoUk9DUnByZWQsICJ0cHIiLCAiZnByIikNCg0KcGVyZjEgPC0gcGVyZm9ybWFuY2UoUk9DUnByZWQsICJwcmVjIiwgInJlYyIpDQpwbG90KHBlcmYxKQ0KIA0KIyBQbG90IFJPQyBjdXJ2ZQ0KcGxvdChST0NScGVyZiwgY29sb3JpemU9VFJVRSwgcHJpbnQuY3V0b2Zmcy5hdD1zZXEoMCwxLGJ5PTAuMSksIHRleHQuYWRqPWMoLTAuMiwxLjcpKQ0KDQpgYGANCg0KYGBge3J9DQoNClNlbnNpYmlsaWRhZCA9IDIxMC8yMTggDQpTZW5zaWJpbGlkYWQNCg0KZXNwZWNpZmljaWRhZCA9IDEwMjQzLzEwMjUxDQplc3BlY2lmaWNpZGFkDQoNCkFjY3VyYWN5ID0gKDEwMjQzICsgMjEwKS8xMDQ2OQ0KQWNjdXJhY3kNCmBgYA0KDQoNCiMjI1JlZ3VsYXJpemFkbw0KDQpgYGB7cn0NCmxpYnJhcnkoZ2xtbmV0KQ0Kc2V0LnNlZWQoMTIzKSANCg0KeCA8LSBtb2RlbC5tYXRyaXgocmVob3NwX29tc34uLCB0cmFpbmluZylbLC0xXQ0KeSA8LSBpZmVsc2UodHJhaW5pbmckcmVob3NwX29tcyA9PSAiMSIsIDEsIDApDQoNCiMjSGFsbGFuZG8gZWwgbWVqb3IgbGFtYmRhDQpjdi5sYXNzbyA8LSBjdi5nbG1uZXQoeCwgeSwgYWxwaGEgPSAxLCBmYW1pbHkgPSAiYmlub21pYWwiKQ0KcGxvdChjdi5sYXNzbykNCmBgYA0KDQpMYSBncsOhZmljYSBtdWVzdHJhIGVsIGVycm9yIGRlIHZhbGlkYWNpw7NuIGNydXphZGEgZGUgYWN1ZXJkbyBjb24gZWwgcmVnaXN0cm8gZGUgbGFtYmRhLiBMYSBsw61uZWEgdmVydGljYWwgcHVudGVhZGEgYSBsYSBpenF1aWVyZGEgaW5kaWNhIHF1ZSBlbCByZWdpc3RybyBkZWwgdmFsb3Igw7NwdGltbyBkZSBsYW1iZGEgZXMgYXByb3hpbWFkYW1lbnRlIC05LCBxdWUgZXMgZWwgcXVlIG1pbmltaXphIGVsIGVycm9yIGRlIHByZWRpY2Npw7NuLiBFc3RlIHZhbG9yIGxhbWJkYSBkYXLDoSBlbCBtb2RlbG8gbcOhcyBwcmVjaXNvLiBFbCB2YWxvciBleGFjdG8gZGUgbGFtYmRhIHNlIHB1ZWRlIHZlciBjb21vIHNpZ3VlOg0KDQpgYGB7cn0NCmN2Lmxhc3NvJGxhbWJkYS5taW4NCmBgYA0KDQpFbiBnZW5lcmFsLCBlbCBwcm9ww7NzaXRvIGRlIGxhIHJlZ3VsYXJpemFjacOzbiBlcyBlcXVpbGlicmFyIGxhIHByZWNpc2nDs24geSBsYSBzaW1wbGljaWRhZC4gRXN0byBzaWduaWZpY2EsIHVuIG1vZGVsbyBjb24gZWwgbWVub3IgbsO6bWVybyBkZSBwcmVkaWN0b3JlcyBxdWUgdGFtYmnDqW4gZGEgdW5hIGJ1ZW5hIHByZWNpc2nDs24uIFBhcmEgZXN0ZSBmaW4sIGxhIGZ1bmNpw7NuIGN2LmdsbW5ldCgpIHRhbWJpw6luIGVuY3VlbnRyYSBlbCB2YWxvciBkZSBsYW1iZGEgcXVlIHByb3BvcmNpb25hIGVsIG1vZGVsbyBtw6FzIHNpbXBsZSBwZXJvIHRhbWJpw6luIHNlIGVuY3VlbnRyYSBkZW50cm8gZGUgdW4gZXJyb3IgZXN0w6FuZGFyIGRlbCB2YWxvciDDs3B0aW1vIGRlIGxhbWJkYS4gRXN0ZSB2YWxvciBzZSBsbGFtYSBsYW1iZGEuMXNlLg0KDQpgYGB7cn0NCmN2Lmxhc3NvJGxhbWJkYS4xc2UNCmBgYA0KDQpgYGB7cn0NCmNvZWYoY3YubGFzc28sIGN2Lmxhc3NvJGxhbWJkYS5taW4pDQpgYGANCg0KQ29uIGxhbWJkYS5taW4gbmluZ8O6biBjb2VmaWNpZW50ZSBlcyBpZ3VhbCBhIGNlcm8uDQoNClVzYW5kbyBsYW1iZGEuMXNlY29tbyBsYSBtZWpvciBsYW1iZGEsIGRhIGxvcyBzaWd1aWVudGVzIGNvZWZpY2llbnRlcyBkZSByZWdyZXNpw7NuOg0KDQpgYGB7cn0NCmNvZWYoY3YubGFzc28sIGN2Lmxhc3NvJGxhbWJkYS4xc2UpDQpgYGANCg0KVXNhbmRvIGxhbWJkYS4xc2UsIHNvbG8gZWwgY29lZmljaWVudGUgZGUgdW5hIHZhcmlhYmxlIHNlIGhhIGVzdGFibGVjaWRvIGVuIGNlcm8gbWVkaWFudGUgZWwgYWxnb3JpdG1vIGRlIGxhem8sIHJlZHVjaWVuZG8gbGEgY29tcGxlamlkYWQgZGVsIG1vZGVsby4NCg0KTGEgY29uZmlndXJhY2nDs24gZGUgbGFtYmRhID0gbGFtYmRhLjFzZSBwcm9kdWNlIHVuIG1vZGVsbyBtw6FzIHNpbXBsZSBlbiBjb21wYXJhY2nDs24gY29uIGxhbWJkYS5taW4sIHBlcm8gZWwgbW9kZWxvIHBvZHLDrWEgc2VyIHVuIHBvY28gbWVub3MgcHJlY2lzbyBxdWUgZWwgb2J0ZW5pZG8gY29uIGxhbWJkYS5taW4uDQoNCmBgYHtyfQ0KIyNMYW1iZGEgcmVncmVzc2lvbg0KbW9kZWwgPC0gZ2xtbmV0KHgsIHksIGFscGhhID0gMSwgZmFtaWx5ID0gImJpbm9taWFsIiwgbGFtYmRhID0gY3YubGFzc28kbGFtYmRhLm1pbikNCmNvZWYobW9kZWwpDQpgYGANCg0KDQpgYGB7cn0NCiMgTWFrZSBwcmVkaWN0aW9ucyBvbiB0aGUgdGVzdCBkYXRhDQp4LnRlc3QgPC0gbW9kZWwubWF0cml4KHJlaG9zcF9vbXMgfi4sIHRlc3RpbmcpWywtMV0NCnByb2JhYmlsaXRpZXMgPC0gbW9kZWwgJT4lIHByZWRpY3QobmV3eCA9IHgudGVzdCkNCnByZWRpY3RlZC5jbGFzc2VzIDwtIGlmZWxzZShwcm9iYWJpbGl0aWVzID4gMC41LCAiMSIsICIwIikNCmBgYA0KDQojIyNNYXRyaXogdHJhaW5pbmcNCmBgYHtyfQ0KU1JMX3ByZWRfdHJhaW4gPC0gcHJlZGljdChtb2RlbCwgeCwgdHlwZT0iY2xhc3MiLCBzPWN2Lmxhc3NvJGxhbWJkYS5taW4pDQpjb25mdXNpb25fbWF0cml4X3RyYWluIDwtIHRhYmxlKHksIFNSTF9wcmVkX3RyYWluKQ0KY29uZnVzaW9uX21hdHJpeF90cmFpbg0KYGBgDQoNCmBgYHtyfQ0KZXJyb3JfcmF0ZV90cmFpbiA8LSAoNTQ0KzE0NTMpLzU3MjAuMA0KZXJyb3JfcmF0ZV90cmFpbg0KYGBgDQoNCiMjI01hdHJpeiB0ZXN0DQpgYGB7cn0NCnhfdGVzdCA8LSBtb2RlbC5tYXRyaXgocmVob3NwX29tc34uLCB0ZXN0aW5nKVssLTFdDQp5X3Rlc3QgPC0gaWZlbHNlKHRlc3RpbmckcmVob3NwX29tcyA9PSAiMSIsIDEsIDApDQpgYGANCg0KYGBge3J9DQpTUkxfcHJlZF90ZXN0IDwtIHByZWRpY3QobW9kZWwsIHhfdGVzdCwgdHlwZT0iY2xhc3MiLCBzPWN2Lmxhc3NvJGxhbWJkYS5taW4pDQpjb25mdXNpb25fbWF0cml4X3Rlc3QgPC0gdGFibGUoeV90ZXN0LCBTUkxfcHJlZF90ZXN0KQ0KY29uZnVzaW9uX21hdHJpeF90ZXN0DQpgYGANCg0KYGBge3J9DQplcnJvcl9yYXRlX3Rlc3QgPC0gKDE2MDUrMTQzKS8xMDQyNC4wDQplcnJvcl9yYXRlX3Rlc3QNCmBgYA0KDQoNCmBgYHtyfQ0KIyBNb2RlbCBhY2N1cmFjeQ0Kb2JzZXJ2ZWQuY2xhc3NlcyA8LSB0ZXN0aW5nJHJlaG9zcF9vbXMNCm1lYW4ocHJlZGljdGVkLmNsYXNzZXMgPT0gb2JzZXJ2ZWQuY2xhc3NlcykNCmBgYA0KDQpgYGB7cn0NCiNyZXBvcnQgbWVhbiBlcnJvciByYXRlIChmcmFjdGlvbiBvZiBpbmNvcnJlY3QgbGFiZWxzKQ0KY29uZnVzaW9uX21hdHJpeF90cmFpbiA8LSB0YWJsZShhcy5tYXRyaXgodGVzdGluZ1ssIDddKSwgeV9wcmVkID4gMC41KQ0KDQpjb25mdXNpb25fbWF0cml4X3RyYWluIDwtIHRhYmxlKHRlc3RpbmcsIHByZWRpY3RlZC5jbGFzc2VzKQ0KY29uZnVzaW9uX21hdHJpeF90cmFpbg0KYGBgDQoNCg0KQ2FsY3VsYW5kbyBlbCBtb2RlbG8gY29uIGxhbWJkYS4xc2U6DQoNCmBgYHtyfQ0KIyBGaW5hbCBtb2RlbCB3aXRoIGxhbWJkYS4xc2UNCmxhc3NvLm1vZGVsIDwtIGdsbW5ldCh4LCB5LCBhbHBoYSA9IDEsIGZhbWlseSA9ICJiaW5vbWlhbCIsDQogICAgICAgICAgICAgICAgICAgICAgbGFtYmRhID0gY3YubGFzc28kbGFtYmRhLjFzZSkNCiMgTWFrZSBwcmVkaWN0aW9uIG9uIHRlc3QgZGF0YQ0KeC50ZXN0IDwtIG1vZGVsLm1hdHJpeChyZWhvc3Bfb21zIH4uLCB0ZXN0aW5nKVssLTFdDQpwcm9iYWJpbGl0aWVzIDwtIGxhc3NvLm1vZGVsICU+JSBwcmVkaWN0KG5ld3ggPSB4LnRlc3QpDQpwcmVkaWN0ZWQuY2xhc3NlcyA8LSBpZmVsc2UocHJvYmFiaWxpdGllcyA+IDAuNSwgIjEiLCAiMCIpDQojIE1vZGVsIGFjY3VyYWN5IHJhdGUNCm9ic2VydmVkLmNsYXNzZXMgPC0gdGVzdGluZyRyZWhvc3Bfb21zDQptZWFuKHByZWRpY3RlZC5jbGFzc2VzID09IG9ic2VydmVkLmNsYXNzZXMpDQpgYGANCg0KDQpbVm9sdmVyIGFsIMONbmRpY2VdKCNpbmRpY2UpPC9kaXY+DQoNCjxocj4NCjxoMyBpZD0iUmVjb21lbmRhY2lvbiIgc3R5bGU9InRleHQtYWxpZ246IGNlbnRlcjsiIG1hcmtkb3duPSIxIj5SZWNvbWVuZGFjaW9uZXMgeSBFc3RyYXRlZ2lhczwvaDM+DQo8ZGl2IHN0eWxlPSJ0ZXh0LWFsaWduOiBqdXN0aWZ5Ij4NCg0KQ29tbyBzZSBwdWRvIG9ic2VydmFyIGVuIGxhIGRlZmluaWNpb24gZGUgbGEgdmFyaWFibGUgZW5kw7NnZW5hIGRlIGxhIHJlaG9zcGl0YWxpemFjacOzbiwgZXN0YSBzZSBjb25zdHJ1ecOzIG1lZGlhbnRlIGRvcyByZXN0cmljY2lvbmVzIGVuIGVsIHNldCBkZSBkYXRvcyBpbmljaWFsOg0KMS4gUXVlIGRlbnRybyBkZSBsb3Mgc2lndWllbnRlcyAzMCBkaWFzIGEgbGEgcHJpbWVyYSBob3NwaXRhbGl6YWNpw7NuIHN1cmdpZXJhIHVuYSBzZWd1bmRhIGhvc3BpdGFsaXphY2lvbi4NCjIuIFF1ZSBwYXJhIGFxdWVsbG9zIGNhc29zIGRvbmRlIGhheSBkb3MgZXZlbnRvcyBlbiBsYSB2ZW50YW5hIGRlIDMwIGTDrWFzLCBsb3MgY8OzZGlnb3MgZGUgZGlhZ27Ds3N0aWNvIENJRTEwIGRlbCBwcmltZXJvIHkgc2VndW5kbyBldmVudG8gcGVydGVuZWNpZXJhbiBhIGxhIG1pc21hIGNhdGVnb3LDrWEgZGUgZGlhZ8Ozc3RpY28gZW4gbGEgY2xhc2lmaWNhY2nDs24gZGUgbGEgT01TLg0KDQpFbiBlc3RlIHNlbnRpZG8sIHRlbmVtb3MgZG9zIGNvbmRpY2lvbmFudGVzIHF1ZSBzZSBwb2Ryw61hbiBhanVzdGFyLCB5YSBxdWUgcmVzdHJpbmdlbiBsYSBwb3NpYmlsaWRhZCBkZSBlbmNvbnRyYXIgdW4gbWF5b3IgbnVtZXJvIGRlIGNhc29zIHF1ZSBzZSBwdWVkYW4gY29uc2lkZXJhciBjb21vIHJlaG9zcGl0YWxpemFjacOzbjsgcG9yIGVqZW1wbG8sIGFsZ3Vub3MgZXN0dWRpb3Mgc3VnaWVyZW4gcXVlIGxhIHZlbnRhbmEgZGUgdGllbXBvIHBvZHLDrWEgc2VyIGRlIDE1IGRpYXMgZW50cmUgZWwgcHJpbWVyIHkgc2VndW5kbyBldmVudG8uIEVuIGN1YW50byBhIGxhIHNpbWlsaXR1ZCBkZSBsb3MgZGlhZ27Ds3N0aWNvcyBkZSBhbWJvcyBldmVudG9zLCBwYXJhIGVzdGUgbW9kZWxvIHNlIHR1dm8gZW4gY3VlbnRhIHNvbG8gc2kgYW1ib3MgZGlhZ27Ds3N0aWNvcyBwZXJ0ZW5lY2VuIGEgbGEgbWlzbWEgY2F0ZWdvcsOtYSwgc2luIGVtYmFyZ28gZXMgaW1wb3J0YW50ZSB0ZW5lciBlbiBjdWVudGEgcXVlIGhheSBkaWFnbsOzc3RpY29zIHF1ZSBwdWVkZW4gZGVzZW5jYWRlbmFyIGVuIG90cm9zIHF1ZSBubyBuZWNlc2FyaWFtZW50ZSBzZWFuIGRlIGxhIG1pc21hIGNhdGVnb3LDrWEuIEVzdGUgdGlwbyBkZSBhc29jaWFjaW9uZXMgcmVxdWllcmVuIGRlIHVuIG1heW9yIGFuw6FsaXNpcyBhIG5pdmVsIG3DqWRpY28uDQoNClNlIGhhbiBkZXNjcml0byBmYWN0b3JlcyBhc29jaWFkb3MgY29uIGxhIHJlaG9zcGl0YWxpemFjaW9uIHJlbGFjaW9uYWRvcyBjb24gbGEgY2FsaWRhZCBkZSB2aWRhIGRlIGxvcyBwYWNpZW50ZXMsIHNpbiBlbWJhcmdvIGVuIGVzdGUgbW9kZWxvIG5vIHNlIGluY2x1eW8gZ3JhbiBwYXJ0ZSBkZSBlc3RlIHRpcG8gZGUgaW5mb3JtYWNpb24sIHlhIHF1ZSwgZGVzZGUgZWwgcHJpbmNpcGlvLCBsYSBwb2JsYWNpw7NuIG9iamV0aXZvIHNlIGNvbXBvbmUgZGUgaW5kaXZpZHVvcyBhc2VndXJhZG9zIGVuIHBvbGl6YSBkZSB2aWRhIHkgc2FsdWQsIGVuIHN1IG1heW9yaWEsIGRlIGVzdHJhdG8gY3VhdHJvIGhhY2lhIGFycmliYS4gRGUgZXN0YSBmb3JtYSB5YSBubyBhcG9ydGEgaW5mb3JtYWNpw7NuIG1lZGlyIGVsIG5pdmVsIGRlIGNhbGlkYWQgZGUgdmlkYSBvIGZhbGljaWRhZCBkZSBhY2Nlc28gYSBsb3Mgc2VydmljaW9zIGRlIHNhbHVkLCBwZXJvIHNlIHBvZHJpYSB0ZW5lciBlbiBjdWVudGEgaW5mb3JtYWNpw7NuIHJlbGFjaW9uYWRhIGNvbiBzaW50b21hcyBkZXByZXNpdm9zLg0KDQpMYSBjYWxpZGFkIGVuIGVsIGN1aWRhZG8gaG9zcGl0YWxhcmlvIHRhbWJpZW4gc2UgaGEgY29uc2lkZXJhZG8gY29tbyB1biBmYWN0b3IgaW1wb3J0YW50ZSwgcG9yIGxvIHRhbnRvIHNlIHBvZHLDrWEgY29uc2lkZXJhciBsYSBhZ3JlZ2FjacOzbiBkZSAgaW5mb3JtYWNpw7NuIHF1ZSBpbmRpcXVlIHF1ZSB0YW4gw7NwdGltYXMgc29uIGxhcyBjb25kaWNpb25lcyBwYXJhIHVuYSBidWVuYSBhdGVuY2nDs24gZW4gbG9zIGNlbnRyb3MgaG9zcGl0YWxhcmlvcyB5IGx1Z2FyZXMgcXVlIHNlIHR1dmllcm9uIGVuIGN1ZW50YS4NCg0KYGBge3J9DQojIFBBU08gMTogICBDYXJnYSBQYWNrYWdlIHkgU2V0IGRlIGRhdG9zDQojIC0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLQ0KbGlicmFyeShDNTApDQpsaWJyYXJ5KHJwYXJ0KQ0KbGlicmFyeShycGFydC5wbG90KSANCmRhdGEoY2h1cm4pOyAjIGNhcmdhIHRhYmxhcw0KDQojIFBBU08gMjogICBDcmVhIEFyYm9sIGRlIERlY2lzaW9uDQojIC0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLQ0KTW9kZWxvQXJib2wgPC0gcnBhcnQocmVob3NwX29tcyB+IC4sIGRhdGEgPSB0cmFpbmluZywgcGFybXM9bGlzdChzcGxpdD0iaW5mb3JtYXRpb24iKSkNCiNNb2RlbG9BcmJvbCA8LSBycGFydChyZWhvc3Bfb21zIH4gLiwgZGF0YSA9IHRyYWluaW5nLCBtZXRob2QgPSAnY2xhc3MnKQ0KIA0KIyBQQVNPIDM6ICBQcmVkaWNlIHJlaG9zcGl0YWxpemFjaW9uIGVuIGRhdG9zIGRlIFRFU1QNCiMgLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tDQpQcmVkaWNjaW9uIDwtIHByZWRpY3QoTW9kZWxvQXJib2wsIHRlc3RpbmcsIHR5cGU9ImNsYXNzIikgIyBQcmVkaWNjacOzbiBlbiBUZXN0DQpNQyAgICAgICAgIDwtIHRhYmxlKHRlc3RpbmckcmVob3NwX29tcywgUHJlZGljY2lvbikgIyBNYXRyaXogZGUgQ29uZnVzacOzbg0KDQpNQw0KIyBQQVNPIDQ6IENyZWEgR3JhZmljbw0KIyAtLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0NCnJwYXJ0LnBsb3QoTW9kZWxvQXJib2wsIHR5cGU9MSwgZXh0cmE9MTAwLGNleCA9IC43LCAgYm94LmNvbD1jKCJncmF5OTkiLCAiZ3JheTg4IilbTW9kZWxvQXJib2wkZnJhbWUkeXZhbF0pDQpgYGANCg0K

Modelo de Predicción Rehospitalización

Andrés Felipe González

Abril 2019

Índice

Generalidades

Entendimiento de los datos

Generalidades

Análisis Exploratorio

Análisis univariado - variables continuas

Análisis variables categóricas

Análisis de clasificación binaria usando WOE y el IV

Modelo

Smote

Ajuste del modelo y Estimación de parámetros

Recomendaciones y Estrategias